Как передать данные в форму?

← →
reonid (2002-03-29 14:20) [4]

Для форм разных классов неплохо подойдёт механизм сообщений
Определи своё сообщение
WM_YOURMSG = WM_USER + 222;

И в своих формах пишешь обработчик

TMyForm = ...
procedure WMYOURMSG(var Msg: TMessage); message WM_YOURMSG;
end;

А потом в цикле посылаешь всем формам
Screen.Forms[i].Perform(WM_YOURMSG, wP, lP);

(если не хватает параметров - в wP и lP можешь хранить ссылку на
структуру с большим числом параметров)

PS Кстати, ссылку на метод объекта в TList не засунешь - это не указатель (см TMethod - он занимает 8 байт).

Как передать данные в форму? Найти похожие ветки