注意：1. 使用WM_SYSCOMMAND时，鼠标的一些消息可能会受到影响，比如不能响应MouseUp事件，可以在窗口中捕获WM_SYSCOMMAND消息，并判断消息的CommandType来判断消息执行完毕的情况 SC_CLOSE 关闭窗口SC_HOTKEY Activate the window Read More
转载
2016-03-23 19:40:00
301阅读
2评论
The WM_COMMAND message is sent when the user selects a command item from a menu, when a control sends a notification message to its parent window, or when an accelerator keystroke is translated.
当用户
原创
2010-06-15 16:45:09
1873阅读
WM_COMMAND Notification
The WM_COMMAND message is sent when the user selects a command item from a menu, when a control sends a notification message to its parent window, or when an accelerator key
原创
2010-09-26 13:16:00
1453阅读
学习 Message(17): WM_SYSCOMMAND 消息[一]
已有定义的系统命令常数(感觉有些有问题):SC_SIZE = 61440;
SC_MOVE = 61456;
SC_MINIMIZE = 61472;
SC_MAXIMIZE = 61
原创
2021-04-30 13:14:34
326阅读
学习 Message(18): WM_SYSCOMMAND 消息[二] : LParam 参数
WM_SYSCOMMAND 消息的 LParam 参数是鼠标位置, 低位是 X, 高位是 Y.
下面三段程序是一样的只是使用不同类型的消息参数, 用 TWMSysCommand 更方便, 用 TMessag
原创
2021-04-30 13:14:33
260阅读
学习 Message(19): WM_SYSCOMMAND 消息[三] : WParam 参数
TMessage.WParam 就是 TWMSysCommand.CmdType; 这是系统命令编号.
下面程序会把 WParam 拦截, 并显示的窗体标题.unit Unit1;
interface
原创
2021-04-30 13:14:31
404阅读
学习 Message(22): WM_SYSCOMMAND 消息[六] : 系统菜单综合操作示例
本例效果图:
代码文件:unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Con
原创
2021-04-30 13:14:27
166阅读
Delphi的VCL框架在创建应用时TApplication是一个自动创建的隐藏窗口，其它创建的窗口是自动以该窗口为窗口，这就导致创始的主窗口在任务栏的系统菜单只有三项，只要在主窗口的Create事件中将系统菜单用Application的系统菜单替换，并将SysCommand消息转发到主窗口就正常了 Read More
转载
2016-03-17 23:43:00
58阅读
2评论
WM_SYSCOMMAND - 系统命令消息，当点击最大化按钮，最小化按钮，关闭按钮等。都会收到这个消息。常用于窗口关闭时提示用户处理。WPARAM - 具体的命令，例如 关闭 SC_CLOSELPARAM - 鼠标的位置LOWORD - 低16位 ，水平位置。HIWORD - 高16位 ，垂直位置... Read More
转载
2015-08-18 21:33:00
203阅读
2评论
学习 Message(20): WM_SYSCOMMAND 消息[四] : 使最大最小化按钮失效
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms
原创
2021-04-30 13:14:30
152阅读
学习 Message(21): WM_SYSCOMMAND 消息[五] : 点击关闭按钮让窗体最小化
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, For
原创
2021-04-30 13:14:29
291阅读
一、 OnSysCommand（）这个函数主要是截获控制命令的，msdn上的解释如下： The framework calls this member function when the user selects a command from the Control menu, or when the user select
转载
精选
2016-09-20 11:14:50
2356阅读
procedure TForm1.pnl1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin ReleaseCapture;SendMessage(pnl1.Handle, Read More
转载
2016-02-25 18:22:00
143阅读
2评论
procedure imgListMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);private procedure WMNCHITTEST(var Msg: TWMNCHITTE... Read More
转载
2015-11-26 22:32:00
73阅读
procedure TForm1.pnl1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin ReleaseCapture;SendMessage(pnl1.Handl... Read More
转载
2015-12-02 06:41:00
185阅读
2评论
现在很多的应用程序都有这样一种功能，当用户选择最小化窗口时，窗口不是象平常那样最小化到任务栏上，而是“最小化”成一个任务栏图标。象FoxMail3.0 NetVampire3.0等都提供了这样的功能。实现这样的功能实际上并不复杂，在窗口最小化时，窗口会发出WM_SYSCOMMAND消息，你只要需要截... Read More
转载
2015-08-21 17:14:00
269阅读
2评论
（1）.
SendMessage(Application->Handle,WM_SYSCOMMAND,SC_MONITORPOWER,1);//关闭显示器
SendMessage(Application.Handle,WM_SYSCOMMAND,SC_MONITORPOWER,-1);//打开显示器
SendMessage(hWnd, WM_SYSCOMMAND, SC_MON
转载
2024-06-30 15:09:29
95阅读
//關閉moniter的電源sendMessage(HWND_BROADCAST,WM_SYSCOMMAND,SC_MONITORPOWER,(LPARAM)2);//打開moniter的電源sendMessage(HWND_BROADCAST,WM_SYSCOMMAND,SC
转载
2010-11-02 10:35:00
120阅读
LTBK Transfer requirement - headerLGNUM 仓库号 TBNUM TR 号S
原创
2021-07-12 10:39:05
233阅读
WM_SYSCOMMAND是TWinControl的消息，因为只有Win控件才需要处理系统命令消息嘛！ procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; //在Public部分声明 procedure TFo Read More
转载
2014-07-25 18:05:00
155阅读
2评论
