Du verwendest freeandnil zur Freigabe eines records.
Das geht nicht!
OnlineHilfe gibt folgendes wieder:
Zitat:
FreeAndNil Routine
Gibt eine Objektreferenz frei und ersetzt die Referenz mit nil (Delphi) oder mit NULL (C++).
Unit
SysUtils
Syntax
[Delphi] procedure FreeAndNil(var Obj: Type);
Beschreibung
Mit FreeAndNil stellen Sie sicher, dass eine Variable nach der Freigabe der Objektreferenz nil (Delphi) bzw. NULL (C++) ist. Im Parameter Obj wird eine Variable übergeben, die ein Objekt repräsentiert.
Warnung:
Obj muss eine Instanz einer von TObject abgeleiteten Klasse sein.
Gruß
onlinekater