Teil-Records aus Stream lesen

[marabu]

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