如保在delphik 写消息,如何定义,有这方面的文章吗,请提供一下谢谢
解决方案 »
- 求救:关于如何继承退出事件!(控件开发)
- 没有装DELPHI的电脑不能运行DELPHI做出来的.exe文件吗
- 请问一个关于DBGrid的问题???
- 【嘉宾聊天】4.28日Borland中国CTO李维先生畅谈技术--聊天记录!
- 如何检测form的重画事件
- 用delphi编写的程序,运行越来越慢,怎么知道内存占用为什么越来越多
- 没有QQ的请留下EMAIL?(Nizvoo)
- 怎样得到一天的起始时间,例如:今天是2001-11-1,则我希望得到:2001-11-1 00:00:00
- SQL的问提!
- BCB请进来拿分数!关于Ring0的。
- DBconsts.pas问题
- 查询出多个记录怎么送入combobox(在线等候,急!!!)
WM_MYMESSAGE = WM_USER + 1001; //这样就自己定义了一个消息发送消息可以用
SendMessage, PostMessage
WM_MYMSG = WM_USER + 100; ....
private
procedure MyMsg(var Msg: TMessage); message WM_MYMSG; ....procedure TForm1.MyMsg(var Msg: TMessage);
begin
ShowMessage('haha! received a default message');
end;procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage(Form1.Handle, WM_MYMSG, 0, 0);
end; .....简单实例, 希望对你有帮助