Variablen in TMemo sortieren ?

[Nuclear-Ping]

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.