Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c