您的位置:首页 > 编程语言 > Delphi

Delphi中,在Form1里边嵌套一个Form2,点击Form2后Form1未置顶

2014-04-17 19:06 246 查看
最近在公司程序里边替换旧的IE控件,Chrome是人家写好的,直接放在了Form里边,值给我提供了几个简单接口,嵌套的程序里边后就出现了啊上述问题:在Form1里边嵌套一个Form2,点击Form2后Form1未置顶。

这个是因为Form2把消息都拦截了,没有发送给它的父窗口Form1。一般情况下,给Form2设置父窗口为:

只要看DemoForm1就可以了,有注释的,使用了
Windows.SetParent(fshowchrome.Handle,Panel1.Handle),

虽然fshowchrome(Form1)的父窗口是Panel1(在Form2中),但实际上没有改变 FParentWindow 这个参数,在Controls.pas文件中有如下操作

所以说实际需要的是给 fshowchrome.ParentWindow := Panel1.Handle;

这样才实际修改了他的父窗口。

简单总结,多多指正,谢谢!
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐