我的Application.Title:='MyApp';主窗体为Form1且Form1.Caption:='MainForm'现在我在Form2中建立一个按钮,向程序发送消息,请问我得怎么做才对呢?
方法一、
H := FindWindow(nil, PChar('MyApp'));
SendMessage(H,1111,0,0);
方法二、
H := FindWindow(nil, PChar('MainForm'));
SendMessage(H,1111,0,0); 我使用以上两种办法都没能在Application.OnMessage中捕获,请问得怎么办才能在Form2发送一个消息
让Application响应呢?
望请得到您的指教,万分感谢!!!
方法一、
H := FindWindow(nil, PChar('MyApp'));
SendMessage(H,1111,0,0);
方法二、
H := FindWindow(nil, PChar('MainForm'));
SendMessage(H,1111,0,0); 我使用以上两种办法都没能在Application.OnMessage中捕获,请问得怎么办才能在Form2发送一个消息
让Application响应呢?
望请得到您的指教,万分感谢!!!
解决方案 »
- 求:vc++小源码转换DELPHI
- 有谁知道在武汉做DELPHI开发多少钱啊???
- delphi8的几个控间请教一下。
- 数据库设计的时候,将字段用英文表示,在用DBgrid时如何用汉字表示
- DELPHI基础问题,在线等待回答
- 请教:如何在sql语句中嵌入变量或文本框内容查询?
- 我用chart做医疗软件,用series进行画线,我想按照一般医疗器械的画线方式,请问如何做?请各位医疗软件高手和Series高手赐教!!!
- 那位仁兄能告诉我dbipacktable函数用法?
- fastreport不能双面打印吗?
- 一个N简单的问题,有人回答对立刻结贴 -关于Delphi的数据类型和API函数的匹配
- 有谁知道CreateMessageDialog函数的具体用法?和其特点?
- 我想把数据存在远程服务器数据库中,前端该如何开发?(前端不用Browse)
procedure TForm2.Button1Click(Sender: TObject);
begin
postmessage(form1.Handle,wm_close,0,0);
end;