Header aus PNG laden

[Zacherl]

Zitat von EWeiss:

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 von EWeiss:

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.