application.onmessage:=wm_user+1000;
或者 自己注册一个试试!
或者 自己注册一个试试!
解决方案 »
- WM_DROPFILES消息怎么用?一个界面上怎么让多个组件同时支持windows外部文件拖拽。DragAcceptFiles。
- 字符串的长度和panel长度的比较
- [求助]如何实现类似联众游戏大厅的效果,桌位图片根据数据集内容更换。
- delphi 7 菜鸟:为什么我的delphi7没有dbExpress工具栏?
- 广州用DELPHI找工容易么,大家说说看?本人过一段时间想去广州发展...
- 怎样同时激活两个窗体(两个Form都呈现亮色)
- UP + GZ 都没有分了,帮我解决问题得高分
- 象FlashGet一样,在IE的菜单出现我的程序。
- 如何处理热键
- 大虾们阿, 谁能解答??? 差了帮助也没有什么帮助阿...
- SQL问题,急!
- 组织DELPHI的开发小组需要注意的问题??
MsgId = RegisterWindowMessage('MyMessage'); //只要注册字符串相同即可
在发送程序中
PostMessage(FindWindow('TApplication', 'Application1'/*Application.Title*/),
MsgId, 0, 0);
在接受程序中使用TApplicationEvents控件,在OnMessage中写
if (Msg.message = MsgId) then
begin
/*do ...*/
end