Hallo Michael,
kann es sein, dass Du in
TFeld Datentypen verwendest, die auf Referenzen beruhen (zB
TObject,
TButton, Pointer aber auch
string)?
Dann fällt mir nur noch auf, dass an dieser Stelle
fs.write(feld,sizeOf(afeld));
afeld dem Leser nicht bekannt ist. Sollte
Code:
SizeOf(afeld)<SizeOf(feld)
gelten, ist das ebenfalls ein Problem.