genau....bis jetzt siehts so aus
Delphi-Quellcode:
//zwei StringListen
zeilen := TStringList.Create;
temp := TStringList.Create;
//Datei laden
zeilen.LoadFromFile (ExtractFilePath(Application.Exename)+'textdatei.txt');
//Trennzeichen definieren
temp.Delimiter := '|';
//For-Schleife alle Zeilen
temp.DelimitedText := zeilen.Strings[i];
if (ListBox1.IndexOf(temp.Strings[0]) = -1) then
ListBox1.Items.Add(temp.Strings[0]);
//Stringlisten entsorgen
temp.Free;
zeilen.Free;
aber habs noch nicht zum laufen bekommen
