Moin Torphyr,
erst einmal herzlich willkommen hier in der Delphi-PRAXiS.
Was erhältst Du, wenn Du erst einmal nur den Header ausliest, und Dir diesen mal hexadezimal anzeigen lässt?
(bezogen auf Deine Beispieldatei)
Beispiel:
Delphi-Quellcode:
var
fsIN : TFileStream;
wHeader : WORD;
begin
fsIN := TFileStream('PfadZuDerCGMDatei',fmOpenRead);
try
fsIN.Read(wHeader,2);
ShowMessage(IntToHex(wHeader,4));
finally
FreeAndNil(fsIN);
end;
end;