摘要: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Panel1: TPanel; B... 阅读全文
posted @ 2008-10-28 22:50 万一 阅读(2257) 评论(0) 推荐(0) 编辑
摘要: 下面是同样的四段程序, 但分别使用了不同的三种消息结构: TWMMouseMove、TWMMouse、TMessage unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = clas... 阅读全文
posted @ 2008-10-28 18:25 万一 阅读(2872) 评论(4) 推荐(0) 编辑
摘要: Perform、SendMessage 会直接发送消息到窗体过程; PostMessage 是把消息放入消息队列. 因为 Application.OnMessage 只接收队列中的消息, 所以 Perform、SendMessage 发送的消息, OnMessage 收不到. 测试如下: 代码文件: unit Unit1; interface uses Windows, Me... 阅读全文
posted @ 2008-10-28 16:58 万一 阅读(5525) 评论(9) 推荐(0) 编辑