程序中有多个form,最小化mainform,如何使其中一个form不被最小化? 实际中最小化mainform后,所有的form都会被最小化。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 重载不想最小化窗口的CreateParamsParams.WNDParent:=GetDesktopWindow; to Amuclan(西绪弗斯) :这个我知道,但我不知道最小化对应的事件是什么?to exu(大脸猫):我还是个新手,不好意思,能说具体点吗? public procedure CreateParams(var Params: TCreateParams); override; //在你的窗体中重载 { Public declarations } end;procedure Tform1.CreateParams(var Params: TCreateParams);begin inherited; Params.EXStyle := Params.ExStyle or WS_EX_TOOLWINDOW; Params.WndParent := GetDesktopWindow; // 重新定义Parent对象句柄,看你的需要了。end;刚才找到了这段代码,总算解决了,呵呵,谢谢大家。 Delphi7和Delphi2009哪个好用一些,尤其是底层开发。 以前Delphi版有个网络通讯分布式版块,现在取消了? 用了参数传递为什么出错?? 新手提的简单问题 重大问题解决不了。up有分+++++++++++; form显示问题 Delphi6.0的安装问题 硬盘毁坏,哪位老大有MASTERING DELPHI6的随书源码? 如何读取dcu中的类型信息? 谁有登陆时的源代码? 请问前辈们这个问题(关于从文件中读写数据的问题) 请问怎样做一个关机的程序?
Params.WNDParent:=GetDesktopWindow;
这个我知道,但我不知道最小化对应的事件是什么?to exu(大脸猫):
我还是个新手,不好意思,能说具体点吗?
procedure CreateParams(var Params: TCreateParams); override; //在你的窗体中重载
{ Public declarations }
end;procedure Tform1.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.EXStyle := Params.ExStyle or WS_EX_TOOLWINDOW;
Params.WndParent := GetDesktopWindow; // 重新定义Parent对象句柄,看你的需要了。
end;刚才找到了这段代码,总算解决了,呵呵,谢谢大家。