急。请问如何捕获单击窗口右边最小化按钮的事件? 我想在窗体最小化时做一些处理,可是如何捕获最小化事件,哪位大侠知道请帮我。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure myminimize(var msg: TWMSYSCOMMAND);message wm_syscommand;procedure tform1.myminimize(var msg: TWMSYSCOMMAND);begin if msg.CmdType = sc_minimize then begin ..... end else inherited;end; 分享快乐免费获取“三星S7230E_3G手机”一部 dll注入,处理多线程 OpenProcess返回0 做软件开发15年,想创业了,欢迎汕头的朋友和我交流交流。 动态创建Progressbar的问题 关于Rave的问题 看到一个用流读文件的函数的代码,不明白,请高人指点? Paradox的字体问题 大家好! 如何用Delphi编制一个支持服务器认证的Smtp邮件程序? 问题比较复杂,高手们请进。up有分! 如何让.net平台支持delphi语言开发的脚本
procedure myminimize(var msg: TWMSYSCOMMAND);message wm_syscommand;
procedure tform1.myminimize(var msg: TWMSYSCOMMAND);
begin
if msg.CmdType = sc_minimize then
begin
.....
end
else inherited;
end;