Delphi-Quellcode:
{; ??? we really have to look for the first eof byte in the
; ??? last record and truncate the file there.
; Not very nice and clean...
;
Und dann gibt es noch andere Falsche-Meldungen:
Delphi-Quellcode:
TFileRec =
packed record (* must match the size the compiler generates: 592 bytes *)
...
{$IFNDEF UNICODE}
Name:
array[0..259]
of AnsiChar;
{$ELSE}
Name:
array[0..259]
of WideChar;
{$ENDIF}
Vonwegen "must"
Deswegen ging nun ein Code nicht mehr, weil man sich auf sowas verläßt.
Die Größe hatte sich also doch verändert und es ist nicht beim AnsiChar geblieben.
Und warum nicht einfach Char?