StringGrid Filter

[jolomino]

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