发现问题:
自己想在Form2中设置透明窗体,然后利用SetWindowsPos函数对Form2进行置顶,
结果发现置顶失败。而在单窗体中是成功的。
然后取消所有代码避免干扰,新建了两个空窗体,然后在form1的按钮事件下面进行form2.show。
结果发现:
1、form2无法覆盖到form1窗体之上,也就是说当form2和form1的位置覆盖时,form2会被form1遮挡。
2、form1不管是最小化还是关闭,form2都会跟随form1的操作。
3、两窗体之间并没有发现父子从属关系。
对比其他编辑器:
发现在易语言中没有这种问题出现,自己比较了两个窗体的区别发现:
delphi中form2是无法在任务栏显示的。
那么利用重载CreateParams方式进行在任务栏显示的处理:
procedure CreateParams(var Params: TCreateParams); override;
procedure TForm2