OnClick bei Listbox

[Markus]

Hallo,

also im Moment verstehe ich nicht ganz was du willst. Ich dachte, dass bei dir das onClick-Event nicht richtig ausgelöst wird, deshalb auch meine Antwort.

Wenn ich den angeklickten Wert in einer Listbox in ein Label übertragen will, dann mache ich das so:

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
var i: integer;
begin
  for i := 0 to ListBox1.Count - 1 do
    if ListBox1.Selected[i] then label1.Caption := Listbox1.Items[i];
end;