Einzelnen Beitrag anzeigen

Mb123

Registriert seit: 7. Jun 2006
33 Beiträge
 
#8

Re: Funktionen aus ListBox auslesen

  Alt 26. Okt 2006, 18:03
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;
  Mit Zitat antworten Zitat