谁能给我个消息处理的例子!谢谢
解决方案 »
- 求CreatePolygonRgn 的反函数
- 关于用delphi作FTP程序的问题!!!FTP跨网段如何实现!
- 脆求骨灰级高手!Windows 2K 用户环境问题?
- 我是菜鸟,谁能告诉我Ado控件的使用方法????
- 特殊的打印要求,高手请进,欢迎指教
- index is read only如何解决
- 真诚地寻求MIME格式的解码方法?????
- 我想从Delphi入门学习编程,请大虾们推荐一些相关的开发软件以及适于入门和进一步提高的经典书籍。
- 各位 何种字体是trueType型的?急!!!!!!!!
- 关于在DELPHI中建立SQL数据库的问题
- 这段访问代码有什么问题,为什么查询的执行时间这么长?
- 申请做专题开发的版主!希望大家大家支持一下!
例如发一条消息使列表框自动下拉:
SendMessage(ComboBox1.Handle,CB_SHOWDROPDOWN,1,0);不想采用默认的消息处理过程可以这样处理:
procedure WMPowerBroadcast(var message: TMessage); message WM_POWERBROADCAST;procedure TForm1.WMPowerBroadcast(var message: TMessage);
begin
message.Result := BROADCAST_QUERY_DENY; {阻止系统关闭热键}
ShowMessage('呵呵,你不消息按了power键,但不会导致关机了^_^')
end;
在form2的实现部分定义uses unti1;这样不会出错,在这里面定义的为私有的不产生循环传递!加分吧,准行!