Строки в Мемо

[BETONOMESHALKA]

Как при нажатии(dubleclick) на строку в мемо перенести ету строку в другой мемо?

[Димарик]

если я правльно понял

begin
Memo2.Lines.Add(Memo1.Lines.Strings[номер той строки которую надо скопировать]);
end;

[AlDelta]

procedure TForm1.Memo1DblClick(Sender: TObject);
begin
Memo1.CopyToClipboard;
Memo2.PasteFromClipboard;
Memo2.Lines.Add('');
end;

[AVer]

Я думаю вы немного неверно уловили суть вопроса... Тут проблема не в вставке, а в том чтоб узнать строку, на которую кликнули. Сам не помню как делается, но если найду - выложу.

[AlDelta]

Сообщение от AVer

Я думаю вы немного неверно уловили суть вопроса... Тут проблема не в вставке, а в том чтоб узнать строку, на которую кликнули. Сам не помню как делается, но если найду - выложу.

AVer возможно и прав, но мой пример работает согласно поставленному условию:

Сообщение от BETONOMESHALKA

Как при нажатии(dubleclick) на строку в мемо перенести ету строку в другой мемо?

Строчка первого Memo1 на котрой был двойной клик копируется во второй Memo2.
Пример: memo.rar

P.S.:Если что не так, с радостью выслушаю любую критику.

[AlDelta]

Строка в которой находится курсор:

IndexLine:=Memo1.Perform(EM_LINEFROMCHAR, -1, 0);
showMessage(IntToStr(IndexLine));

[AVer]

Итак, общими услилиями...

Memo2.Lines.Add(Memo1.Lines.Strings[Memo1.Perform(EM_LINEFROMCHAR, -1, 0)]);