1.定义一个Procedure MyMessage (var Msg: TMsg; var Handled: Boolean);
在这里写你的代码,记录Message的信息
2.在FormCreate或者你觉得该付值的时候定义一下:
Application.onmessage:=MyMessage;
3.不跟踪的时候再给他还原这样记录之后如果你用文本看,你可以看到一大堆1,2,3,4,5,6,7....呵呵
在这里写你的代码,记录Message的信息
2.在FormCreate或者你觉得该付值的时候定义一下:
Application.onmessage:=MyMessage;
3.不跟踪的时候再给他还原这样记录之后如果你用文本看,你可以看到一大堆1,2,3,4,5,6,7....呵呵
解决方案 »
- 使用ExtractFilePath获取exe文件所在目录后,如何取得改目录下的某个子目录
- 怎么样用DSPack控件来播放视频资源?
- 公司来一位漂亮的女程序员!
- 请问怎样在DELPHI编写的程序中关闭与打开ctrl+alt+del 也就是让人无法打开任务管理器
- 多文档窗体之间传值的问题
- 一个奇怪的问题?
- 看看我这个程序,为什么总是运行的时候出现内存访问错误?
- comcat.h对应Delphi里边的哪个dcu或是pas?
- Google为什么变成了服务器错误,页面可以访问但是无法查询
- 高分。怎么获得系统中所有运行中的程序的当前使用目录
- 菜鸟发问,Delphi中inherited是干嘛的?
- 加急--高分请高手(今天必须解决的问题):用AT命令编制两个MODEM对拨接通后传输字符串的程序?
请问如何还原
详细解释一下 2 ,3 的内容,最好给有些代码
2,3的内容就是给OnMessage付值, 没有别的内容,但是这样在文本里显示的都是数字,连Memo里光标跳一条都是一个事件,具体可不可以转换成某个Button的Click等很直观的显示我就不是很清楚了,没有试过.