копировать вставить мемо

[spartan92]

как написать проседуру на копирование текста из мемо...и вставить этот текст в едит

[Valio]

Получить текст Мемо целиком - Memo.Text
Получить строку - Memo.Lines[i] где i -номер строки.

и т.д. Вообщем смотри свойства компонента.

[Вадим Мошев]

Следует учитывать, что текст в Edit - однострочный, в то время, как в Memo - Многострочный.

[artemavd]

uses 
 Clipbrd;
....
//копируем из Мемо в буфер
procedure TForm1.Button1Click(Sender: TObject);
begin
 Form1.sMemo1.CopyToClipboard;
end;

//вставляем содержимое буфера (скопированное из Мемо) в Edit1
procedure TForm1.Button2Click(Sender: TObject);
begin
 Form1.edt1.PasteFromClipboard
end;

Сработает правильно, если копируется из Мемо одна строка.

[spartan92]

artemavd

спасибо большое...очень помог