копирование текста с другой формы

← →
очень нужно (2004-04-07 18:01) [0]

Уважаемые Мастера!!! Две формы отображаются одновременно (типа как в самой Делфи). На одной форме кнопки для работы с буфером. Нужно скопировать текст со второй формы, нажатием на кпопку "Копировать" на первой форме. Как это осуществить?

← →
Семен Сорокин © (2004-04-07 18:22) [1]

WM_COPY, WM_COPYDATA?

← →
очень нужно (2004-04-07 18:31) [2]

я вот так пробовал, не реагирует никак!!!
procedure TForm1.CopyClick(Sender: TObject);
var
Mes: TWMCopy;
begin
Mes.Msg := WM_COPY;
Screen.ActiveControl.Dispatch(Mes);
end;

← →
WebErr © (2004-04-07 18:32) [3]

Удалено модератором

← →
Семен Сорокин © (2004-04-07 18:33) [4]

Удалено модератором

Вот, что написано про WM_COPY в Help"e:

An application sends the WM_COPY message to an edit control or combo box to copy the current selection to the clipboard in CF_TEXT format.

Т.е. если текст "нарисован"(!) на форме, то рекомендую использовать GDI процедуры, типа BitBlt, для "перерисовки" текста! :serious)

S1 := S2

копирование текста с другой формы Найти похожие ветки