学习 Message(5): 关于 TApplicationEvents.OnMessage 的第二个参数
摘要:TApplicationEvents.OnMessage 的第二个参数 Handled 如果是 True, 表示消息已经处理过了, 到此为止. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, AppEvnts,...
阅读全文
posted @
2008-10-25 12:03
万一
阅读(4703)
推荐(0) 编辑
学习 Message(4): 通过 Application.OnMessage 或 TApplicationEvents 响应消息
摘要:通过 Application.OnMessage 响应消息: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: ...
阅读全文
posted @
2008-10-24 22:38
万一
阅读(5086)
推荐(0) 编辑
学习 Message(3): 响应 WM_LBUTTONDOWN 消息
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; proce...
阅读全文
posted @
2008-10-24 21:28
万一
阅读(6133)
推荐(0) 编辑
学习 Message(2): 发送 WM_MOUSEMOVE 消息
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Panel1: TPane...
阅读全文
posted @
2008-10-24 20:49
万一
阅读(6882)
推荐(0) 编辑
学习 Message(1): 消息发送
摘要:消息流程: 譬如用鼠标左键点击一下窗体, 系统会收到一条 WM_LBUTTONDOWN 消息; 当鼠标抬起, 系统又会收到 WM_LBUTTONUP 消息. 系统收到消息后, 会告诉窗体发生的事情, 然后窗体再做出反应; 当然窗体能否做出反应要看窗体是否有相应的响应代码. 要响应 WM_LBUTTONDOWN 消息, 我们需要在 OnMouseDown 事件中写代码; 要响应 WM_LBU...
阅读全文
posted @
2008-10-24 16:41
万一
阅读(9481)
推荐(1) 编辑
用 API 实现的获取文本容器中选择的文本 - 回复 "roy.flex" 的问题
摘要:问题来源: http://www.cnblogs.com/del/archive/2008/06/18/1083011.html#1229305 告诉 roy.flex 同学: 你的问题还是挺复杂的, 先要完成的就是这一步; 再往下做, 如果要捕获其他程序中的鼠标需要做 DLL; 不过还有个简单办法, 就是用 TTimer 定时获取, 这样也就不用钩子了; 但是还需要知道要操作对象的句柄,...
阅读全文
posted @
2008-06-19 00:32
万一
阅读(4940)
推荐(0) 编辑
不使用标题栏拖动窗体
摘要:方法一、二、三效果图:方法四效果图:方法一:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormMouseDown(Sender: TObject;...
阅读全文
posted @
2008-04-30 22:26
万一
阅读(5881)
推荐(0) 编辑
使用 WM_NCHITTEST 消息判断鼠标所在窗口的部位
摘要:本例效果图: WM_NCHITTEST 消息返回后, 消息的 Result 参数表示了鼠标所在窗口的部位. 窗体设计步骤: 新建工程后, 随便添加一个菜单; 设置窗体的 AutoScroll 属性为 True, 并添加一个 Panel 放在合适的位置, 以让窗口出现滚动条. unit Unit1; interface uses Windows, Messages, SysUtils, ...
阅读全文
posted @
2008-04-30 14:56
万一
阅读(10002)
推荐(0) 编辑
Windows 消息
摘要:消息 值 注释 WM_NULL$0000 WM_CREATE$0001 WM_DESTROY$0002 WM_MOVE$0003 WM_SIZE$0005 WM_ACTIVATE$0006 WM_SETFOCUS$0007 WM_KILLFOCUS$0008 WM_ENABLE$000A WM_SETREDRAW$000B WM_SETTEXT$000C WM_GETTEXT$000...
阅读全文
posted @
2008-02-25 02:18
万一
阅读(12394)
推荐(1) 编辑