Textdatei in Record Muster überführen

[Furtbichler]

Zitat von p80286:

Ich halte das für einen Fehler, da für jeden String ein Längenbyte dazu addiert werden müßte.
Also für string[20] ist die Länge 20+1.

Falsch. SizeOf(string[20]) ergibt 21. und SizeOf(TPerson) liefert die richtige Größe, denn SizeOf liefert immer den Speicherplatzverbrauch des Typen/Variablen.

Falsch ist es, die Größe selbst ausrechnen zu wollen, denn man weiß nicht, wie Delphi die Recordfelder ausrichtet. Dies ist abhängig von den Compilereinstellungen und ob man das Record als 'packed' deklariert hat.