Показать сообщение отдельно
  #2  
Старый 15.05.2009, 23:16
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

если я правильно понял, то речь идет о сообщении, передаваемое программой (окном) другой программе (окну), что-то на подобие
Код:
SendMessage(Handle,MY_MESSAGE,wParam,lParam)
в своем проекте делал вот так:
Код:
const
  MY_MESSAGE=WM_USER+1;
.....
  SendMessage(GetHandle('User'),MY_MESSAGE,0,0);
GetHandle('User') - функция, результатом которой является хендл окна, которому надо передать сообщение (функция самописная), можно использовать любой необходимый хендл
соответственно отработка этого сообщения в окне-получателе:
Код:
...
private
   procedure GetMyMessage(var Msg: TMessage); message MY_MESSAGE;
...
   procedure GetMyMessage(var Msg: TMessage); message MY_MESSAGE;
   begin
   {что-то делаем при получении сообщения}
   end
 
в окне, которое обрабатывает сообщение, также объявляется константа
MY_MESSAGE=WM_USER+1;
(не обязательно WM_USER+1, можно и +2 и +3 и т.д., можно создать кучу сообщений, т.е. констант)
процедуру реакции на сообщение писал по памяти, исходников под рукой нет
__________________
Понять, что хочет заказчик - бесценно, ведь он платит MasterCard
Ответить с цитированием