Deine Übersetzung war zunächst richtig
Aber ich erwähne kein Array, da keines vorhanden ist...
Hier mal ein kleiner Auszug vom "Vorwärtslesen"
Delphi-Quellcode:
if not eof(f) then read(f,P)
else
begin
Label1.Enabled:=true;
Label1.Caption:= 'Dateiende erreicht!';
end;
begin
Edit1.Text:=P.Name;
Edit2.Text:=P.VName;
Edit3.text:=P.Straße;
Edit4.Text:=P.TelNr;
Edit6.Text:=IntToStr(FilePos(f));
end;