Markiertes Listbox Item nach Edit

[Sharky]

Was möchtest Du denn genau machen?
Dein Code gilt ja (allerdings mit fehler) für eine ListBox mit MultiSelect.
Wenn Du "nur" das selektierte Item im Edit haben möchtest dann :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
   Edit2.Text := Listbox1.Items[Listbox1.ItemIndex];
end;