нече не понял о чем ты, нормальные люди делают так:
delphi Код:
for i:=0 to ReadH(4)-1 do
if ReadD(i*offset+12)=57 then
begin
//OIDadena:=ReadD(i*offset+8);
Countadena:=ReadD(i*offset+16);
exit;
end;
где offset - размер блока для вещи, для ил щас скажу скока...
36 офсет для ИЛа