Главная страница
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.051 c
2-1155486914
fog
2006-08-13 20:35
2006.09.03
Координаты курсора


2-1155225004
Fu
2006-08-10 19:50
2006.09.03
Функция


15-1154599583
atruhin
2006-08-03 14:06
2006.09.03
Вопрос по настройке маршрутизации в сетях


6-1144821895
DelphiN!
2006-04-12 10:04
2006.09.03
Размер сетевого TCP/IP пакета


3-1150965531
Megabyte
2006-06-22 12:38
2006.09.03
Использование параметров в кач-ве имени таблицы