如何编写消息响应函数(50分)

nuaa.cs.zhanglu · 2001-03-18

小弟想在程序中编写对自定义的消息的响应的函数，不知应做哪些工作。  我在实验过程中，发现如果编写一个响应WINDOWS的标准消息，如WM_MOUSEMOVE,自己编写的 响应函数不会触发。

Jhdandcl · 2001-03-18

unit1 ; ...... form1=Class(Tform1) ....   public    procedure Myprocedure9(var msg:Tmessage) ;message wm_mousemove;  .... end; ..... procedure form1.Myprocedure9(var msg:Tmessage); begin     ...   你的代码...     ... end;

教父 · 2001-03-18

>>自己编写的响应函数不会触发。 这是什么意思？

wheel · 2001-03-19

悲酥清风 · 2001-03-19

再说详细点。

jame · 2001-03-19

Delphi的例子有

程云 · 2001-03-19

你是意思是不是要写自定义消息， 然后截获这个消息，是吧？

mafan · 2001-03-19

listen

Kingron · 2001-03-19

必须要有激发的条件啊。例如用于回调或者发送一个消息啊： 一个简单的例子： const MyMessage=WM_USER+100; type   TForm1 = class(TForm)     Button1: TButton;     procedure Button1Click(Sender: TObject);     procedure MyMessageProc(var msg:TMessage);message MyMessage;   private   public   end; var   Form1: TForm1; implementation {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); begin   sendmessage(handle,mymessage,0,0); end; procedure TForm1.MyMessageProc(var msg: TMessage); begin   showmessage('fksdfds'); end; end.

悲酥清风 · 2001-03-23

如果不同程序问通讯还得用RegisterWindowMessage函数。

geoffer · 2001-03-28

那么，消息处理过程和发送消息(sendmessage)可不可以不再同一模块中呢？ 我在一单元中，定义了消息常量和消息处理过程，为什么在另一单元中调用sendmessage 就得不到消息触发呢？ 多谢！

jame · 2001-03-28

看windows核心编程一书中的最后关于消息部分说明： sendmessage是必须要接受消息模块处理完毕才会返回的。而postmessage不必。 但是这个和是否定义在一个单元无关。我曾经在两个单元中使用消息来传递信息 没有问题。你的sendmessage的确是向你需要的单元发送了消息嘛？ 不妨先将一个单元的窗口名字定义好，然后findwindow再发消息

wind2000 · 2001-03-28

我在一程序中用了NMUDP控件，但发现如果程序运行时无法关机，我在程序中加了以下代码，但没用? procedure ExitWin(var msg: TWMQUERYENDSESSION); message WM_QUERYENDSESSION; procedure TMainForm.EexitWin(var msg: TWMQUERYENDSESSION); //关机时关闭程序 begin   inherited;   Close; end;

peng_qs · 2001-06-04

将Msg.result :=1再试试.如果还不行,可以再加一句Halt强行关闭退出..

wjiachun · 2002-04-20

多人接受答案了。

如何编写消息响应函数(50分)

nuaa.cs.zhanglu

Unregistered / Unconfirmed

Jhdandcl

Unregistered / Unconfirmed

教父

Unregistered / Unconfirmed

wheel

Unregistered / Unconfirmed

悲酥清风

Unregistered / Unconfirmed

jame

Unregistered / Unconfirmed

程云

Unregistered / Unconfirmed

mafan

Unregistered / Unconfirmed

Kingron

Unregistered / Unconfirmed

悲酥清风

Unregistered / Unconfirmed

geoffer

Unregistered / Unconfirmed

jame

Unregistered / Unconfirmed

wind2000

Unregistered / Unconfirmed

peng_qs

Unregistered / Unconfirmed

wjiachun

Unregistered / Unconfirmed

Similar threads