Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.03;
Скачать: CL | DM;

Вниз

создание и обработка своих сообщений   Найти похожие ветки 

 
angelsaint   (2006-05-09 12:38) [0]

доброго времени суток мастера. нужно сделать следующее: послать форме свое собственное сообщение и чтобы форма на него отреагировала. Но, процедура обработки должна получать не msg: TMessage, а мой собственный тип данных. Как послать сообщение и передать нужную мне структуру?
с помощью SendMessage, PostMessage я что-то не пойму ак это можно сделать...

 TMyMess = record
   Mess: integer;
   Data: string[250];
 end;


 TForm1 = class(TForm)
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
   procedure WMCall(var mess: TMyMess);  message MY_SUPER_MESS;
 end;


 
Eraser ©   (2006-05-09 13:31) [1]


> angelsaint   (09.05.06 12:38)

WM_COPYDATA


 
angelsaint   (2006-05-09 13:41) [2]


> Eraser

непонял


 
Eraser ©   (2006-05-09 14:04) [3]


> angelsaint   (09.05.06 12:38)

для того, чтобы передать данные нужно использовать сообщение WM_COPYDATA, пример есть в MSDN.


 
begin...end ©   (2006-05-09 15:30) [4]

> angelsaint

Уточните, где находится эта форма -- в том же приложении, откуда посылается сообщение, или в другом.


 
Leonid Troyanovsky ©   (2006-05-09 17:22) [5]


> begin...end ©   (09.05.06 15:30) [4]


WM_COPYDATA forever.

--
Regards, LVT.


 
begin...end ©   (2006-05-09 17:31) [6]

> Leonid Troyanovsky ©   (09.05.06 17:22) [5]

Я не вижу причин, по которым в пределах одного приложения нужно было бы использовать именно WM_COPYDATA.


 
Leonid Troyanovsky ©   (2006-05-09 18:27) [7]


> begin...end ©   (09.05.06 17:31) [6]


А чтоб не было разницы, в своем -чужом.

--
Regards, LVT.


 
begin...end ©   (2006-05-09 18:55) [8]

> Leonid Troyanovsky ©   (09.05.06 18:27) [7]

Очень сильный аргумент.



Страницы: 1 вся ветка

Текущий архив: 2006.09.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.064 c
1-1153426862
oxffff
2006-07-21 00:21
2006.09.03
Триангуляция на Delphi. Готовое решение. Кто обладает


15-1155201392
Kolan
2006-08-10 13:16
2006.09.03
А есть у кого "Паттерны" с нормальными картинками


3-1151066783
barakuda
2006-06-23 16:46
2006.09.03
Умный combobox + table


15-1154928251
Ega23
2006-08-07 09:24
2006.09.03
С Днём рождения! 6 августа


6-1144955552
qazwsx
2006-04-13 23:12
2006.09.03
base64_encode(pack("H*", sha1(utf8_encode($_GET[ pwd ])))))