Посылка сообщения всем формам - BroadCast

Благодарю за поддержку!

		Новости сайта
		Новости форума

Архив исходников

Automatic translation

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Посылка сообщения всем формам - BroadCast

var
  I: Integer;
  M: TMessage;
  ...
  with M do begin
    Message := ...
  ...
end;
  PostMessage( Forms[I].Handle, ... );
  // Если надо и всем чилдам
  Forms[I].Broadcast( M );
end