Главная страница
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.053 c
15-1154325392
Jeer
2006-07-31 09:56
2006.09.03
Флаг и гюйс поднять !


15-1154787455
ZeroDivide
2006-08-05 18:17
2006.09.03
Женился


15-1155203084
DmitryS
2006-08-10 13:44
2006.09.03
Дайте совет по написанию трехзвенки


6-1143721565
vic_774N
2006-03-30 16:26
2006.09.03
решение проблемы подсей


2-1154941898
Chort
2006-08-07 13:11
2006.09.03
сканирование дисков