Я в файле ищю нужный мне буфер данных через TMemoryStream или TFileStream. Выглядит примерно так.
var InFile:TMemoryStream;
Pos:LongWord;
Temp:Array[0..100]Of Byte;
FindCount:Word;
begin
InFile:=TMemoryStream.Create();
InFile.LoadFromFile('Твой файл.bin');
FindCount:={Длина поисковой строки}
While Pos<>InFile.Size Do
Begin
InFile.ReadBuffer(Temp,FindCount)
InFile.Position:=Pos;
If Temp={То что тыищеш}Then ...
End;
InFile.Free;
|