Funktionen aus ListBox auslesen

[Mb123]

habs jetzt doch anders gemacht.. ich les die werte die in der listbox stehen einfach aus und setze sie dann wieder in die edit felder ein & arbeite dann von dort aus mit ihnen weiter. aber tortzdem danke für deinen vorschlag ! Hier der Code:

Delphi-Quellcode:

procedure TMemo1.ListBox1Click(Sender: TObject); 
var s,SubStr,SubStr2:string; 
begin 

s := listbox1.items[listbox1.itemindex]; 

SubStr := Copy(s,Pos('=',s)+1,25); 
edit2.Text:= SubStr; 

SubStr2 := Copy(s,0,Pos('=',s)-1); 
edit1.Text:= SubStr2; 

end;