Delphi помогите с мемо

Вопрос такой: как можно сделать чтобы по lдвойному клику по строчке в мемо она переносилась в label.caption?

 

если правильно понял то, так:

Code:

Label1.Caption:= Memo1.SelText

 

По идее нормальных методов нету. Потому что у мемо чуть другое предназначение.
Юзай ListBox.

2 alexey-m то что ты написал - это для выделенного текста, а если строка состоит из 3 слов, то при двойном клике выделится тока 1 слово, оно же и скопируется.

 

понял правильно но почему то не работает =)

 

хорошо буду пробывать

 

странно но в листбокс он вставляет имена найденых файлов

 

всё разобрался. Уважаемый slesh а не подскажешь на счёт моего главного вопроса? как по двойному клику присвоить лабелу значение из листбока?

 

Code:

procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
      Label1.Caption := ListBox1.Items.Strings[ListBox1.ItemIndex];
end;

 

благодарен