[alikoder]

Вообщем есть у меня на форме listbox, edit, button, я сделал что при нажатии на кнопку содержимое edit, копируется в listbox, а вот как сделать, чтобы наоборот по нажатию на строчку в listbox, текст из неё передался в edit?

[Yurk@]

Сделай обратную операцию по событию OnChange для ListBox!!!

[Rosenkrantz]

Код:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  if ListBox1.ItemIndex <> -1 then
    Edit1.Text := ListBox1.Items[ListBox1.ItemIndex];
end;