Hallo,
was du laut Format-Spezifikation brauchst sieht eher so aus:
Delphi-Quellcode:
type
TGIF_HEader = packed record
Signature: array [0..2] of Char;
Version: array [0..2] of Char;
end;
TGIF_LogicalScreenDescriptor = packed record
LogicalScreenWidth: Word;
LogicalScreenHeight: Word;
Options: Byte;
BackgroundColorIndex: Byte;
PixelAspectRatio: Byte;
end;
// ...
String[6] ist also auf jeden Fall falsch. Wenn du jeden GIF Block-Typ einzeln gemäß Spezifikation definierst, dann fällt dein Problem einfach weg, aber grundsätzlich funktioniert die von Hawkeye vorgestellte Methode.
Grüße vom marabu