P plazhaofeng Unregistered / Unconfirmed GUEST, unregistred user! 2007-09-22 #1 请问是不是只有顶层窗口才能收到广播消息,如果我的程序没有窗体怎样才能收到比如检测USB键盘的DBT_DEVICEARRIVAL这样的广播消息.谢谢.<br>请帮个忙,只有这么多分了
T tanbo23456 Unregistered / Unconfirmed GUEST, unregistred user! 2007-09-24 #3 比如这个消息是WINDOS的,<br>你定义一个消息接收函数,<br>procedure DBTDEVICEARRIVAL(var Msg :Message DBT_DEVICEARRIVAL<br>然后调用API函数发送消息,这里你可以控制,写在FORMCREAT下面也可以,写在控件下面也行<br>sendMessage(form1.Handle,DBT_DEVICEARRIVAL,0,0);<br>procedure DBTDEVICEARRIVAL(var Msg :Message DBT_DEVICEARRIVAL在这个函数下面写你收到消息后的动作,比如写个收到消息,SHOWMESSAGE('收到USB键盘消息!');<br>如果加inherited,再要把消息返回给他的祖先类,你也可以不要这句
比如这个消息是WINDOS的,<br>你定义一个消息接收函数,<br>procedure DBTDEVICEARRIVAL(var Msg :Message DBT_DEVICEARRIVAL<br>然后调用API函数发送消息,这里你可以控制,写在FORMCREAT下面也可以,写在控件下面也行<br>sendMessage(form1.Handle,DBT_DEVICEARRIVAL,0,0);<br>procedure DBTDEVICEARRIVAL(var Msg :Message DBT_DEVICEARRIVAL在这个函数下面写你收到消息后的动作,比如写个收到消息,SHOWMESSAGE('收到USB键盘消息!');<br>如果加inherited,再要把消息返回给他的祖先类,你也可以不要这句