Wenn in deiner Datei nur Texte drinstehen, kannst du auch von der typisierten Datei abstand nehmen und den ganzen Spaß im
CSV-Format speichern und das per TStringList verwalten.
Delphi-Quellcode:
var
sList: TStringList;
begin
sList := TStringList.Create;
try
sList.Add ('Müller;Franz;Hannover;31.02.1974');
sList.Add ('Albrecht;Gustel;Dortmund;15.08.1949');
sList.Add ('Zeppelin;Ferdinand;Berlin;08.07.1838');
sList.Add ('Klemens;Klaus;Dresden;07.12.1969');
sList.SaveToFile ('C:\daten.txt');
ShowMessage (sList.GetText);
sList.Clear;
sList.LoadFromFile ('C:\daten.txt');
sList.Sort;
ShowMessage (sList.GetText);
finally
FreeAndNil (sList);
end;
end;
Das ist natürlich nur eine rudimentäre Sortierung nach Nachname. Nach dem Laden kannst du die Zeilen anhand des ; trennen und in deinen Record-Typ übergeben. Das Trennen kannst du mit den Stringfunktionen Copy, Pos, Length, Delete machen - oder du suchst mal nach String Explode.