随笔分类 -  Delphi-消息研究

摘要:TWMKey = packed record Msg: Cardinal; CharCode: Word; Unused: Word; KeyData: Longint; Result: Longint; end;FormShortCutFOnShortCutIsS... 阅读全文
posted @ 2014-04-15 21:03 findumars 阅读(829) 评论(0) 推荐(0) 编辑
摘要:试图改写TForm1(注意,不是TForm类)的WndProc函数,从而达到某些目的。程序如下:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, ... 阅读全文
posted @ 2014-01-17 14:04 findumars 阅读(363) 评论(0) 推荐(0) 编辑
摘要:工程含有1个MDI主窗口和2个子窗口。唯一需要注意的是,每个窗体都有ClientHandle,但只有当自己是MDI主窗体的情况下才有值,否则等于0。unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Co... 阅读全文
posted @ 2014-01-15 13:20 findumars 阅读(799) 评论(0) 推荐(0) 编辑
摘要:实例1unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; constWM_ME=WM_USER+100; //自... 阅读全文
posted @ 2014-01-15 07:48 findumars 阅读(2821) 评论(0) 推荐(0) 编辑
摘要:第一步,貌似什么都不做,但如果提前定义InitProc就不一样了 第二步,创建一部分Form,特别是MainForm 第三步,使用repeat建立消息循环 第3.1步,具体处理每一个消息循环 第3.2步,取得消息并分发消息,但是分发前好像还会先执行FOnMessage(Msg, Handled); 阅读全文
posted @ 2013-08-19 03:22 findumars 阅读(2602) 评论(0) 推荐(0) 编辑