Du hast ja 2 Scahen vermischt, du hast einen Record und eine Klase welche eine Eigenschaft Items hat welche eine Liste oder eienen Array von diesem Recird besitzt
Du könntest wie folgend vorgehen
Delphi-Quellcode:
type
TStammdatum = record
TITEL :String[20];
NACHNAME :String[40];
VORNAME :String[28];
GEBURTSNAME :String[40];
GEBURTSDATUM :String[12];
GESCHLECHT :String[1];
STRASSE :String[40];
PLZ :String[7];
ORT :String[40];
end;
TStammdaten = class
..
Items: Array of TStammDatum;
..
procedure add ( wert: TStammdatum);
var
pos: Integer;
begin
pos := Length( items) +1 :
SetLength( Items, pos);
Items[pos] := Wert;
end;
...
end;