So wie der Code oben abgebildet wirft er mir kein Exeption glaube mir das Bitte.
D2010.
In meiner Erinnerung hat selbst Delphi 7 beim Aufruf von
StrToInt
mit ungültiger Zahl schon eine
Exception geschmissen. So oder so ist "ANIM" auf jeden Fall keine Zahl, weshalb
StrToInt
nicht funktionieren kann und in irgendeiner Form fehlschlagen wird.
Aber nur zur Sicherheit:
Der Code wird wirklich ausgeführt und du hast auch keinen
Exception Handler um den Aufruf, der die
Exception ggfls. abfangen könnte?
Zitat:
Der Header steht genau in der von dir modellierten Form (TAniHeader) direkt am Anfang der Datei?
Nein ganz hinten
Dann kannst du einfach mit
TFileStream.Seek
ans Ende der Datei abzüglich
SizeOf(TAniHeader)
springen und den Header direkt mit
TFileStream.Read(anih, SizeOf(anih))
auslesen.