判断窗体是否为最小化 请问怎么样判断窗体是否为最小化 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 IsIcon(Handle);IsIcon(Application.Handle); type TForm1 = class(TForm) private procedure WMSysCommand(var Message: TMessage); message WM_SYSCOMMAND; //... end;implementation{$R *.DFM}procedure TForm1.WMSysCommand(var Message:TMessage);begin if Message.WParam = SC_ICON then //最小化了 begin //form1.hide; ... end else inherited;end; if Form1.WindowState=wsMinimized then 广州亿程交通信息有限公司--兄弟们有谁知道具体情况? 谁有D7环境下收发电子邮件的原代码吗>谢谢! 告诉大家一个修改网卡物理地址(MAC地址)的方法 为什么我编译不能通过 恳请各位兄台帮忙,较急! PageControl的问题 关于TPasswordEncode类 我用API函数ftpgetfile下载文件,如何显示下载进度和其它状态---急待 D2007如何安装Raize 6 如何注销或退出WIN2000系统,用哪些函数 同一个系统可不可以装不同版本的DELPHI?? 如回答,马上结帐!-->怎么获取指定表中指定字段的字段类型????TadoConntion里有这样的函数吗?
IsIcon(Application.Handle);
TForm1 = class(TForm)
private
procedure WMSysCommand(var Message: TMessage); message WM_SYSCOMMAND;
//...
end;implementation{$R *.DFM}
procedure TForm1.WMSysCommand(var Message:TMessage);
begin
if Message.WParam = SC_ICON then //最小化了
begin
//form1.hide; ...
end
else
inherited;
end;