Listbox, Text zwischen ( ) ausgeben

[runningsoft]

Vorher musst du natürlich noch den String bestimmen, auf den Du geklickt hast.

Also im OnClick-Ereignis der ListBox:

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
var Eintrag : String;
begin
Eintrag := ListBox1.Items[ListBox1.ItemIndex];
end;

Steffen