Record im Objekt

[Sidorion]

Die Variable Kundendaten ist nicht initialisiert.
a) im FormShow erst Kundendaten:=TKundendaten.Create rufen, dann solltest du die Variable allerdings als Member von TForm1 machen
oder
b) falls Kundendaten global sein soll ne Zugriffsfunktion implementieren.

Delphi-Quellcode:

Function GetKundendaten: TKundendaten;
Begin
  If not Assigned(Kundendaten)
  Then Kundendaten:=TKundendaten.Create;
  Result:=Kundendaten;
End;

Dann solltest Du aber einen Init/final sektion anfügen (direkt vor dem End.)

Delphi-Quellcode:

Initialization
  Kundendaten:=Nil;
Finalization
  GetKundenDaten.Free;