Du liest den Header ja nirgends aus bzw. weißt deinem
var
Parameter niemals einen Wert zu.
Außerdem:
Delphi-Quellcode:
for IntI := Low(ByteArray) to High(ByteArray) do
begin
if (ByteArray[IntI] * 4) = StrToInt('ANIM') then
Result := True
end;
Was soll dieser Code bewirken?
Ich kann nur sagen, dass
StrToInt('ANIM')
schonmal definitiv eine
Exception schmeißen wird.
Deswegen frage ich ja was falsch ist.
Nein ein exeption wird nicht geworfen es kommt ein true zurück.
Wie komme ich denn an den Header und kann nach dem anih.Sign := ANIM suchen?
Die Daten sollten sich ja im ByteArray befinden.
gruss