我的程式有两个表单。在执行时的某个点,两个表单都会显示出来-一个在另一个的上方。我希望能够将下方的表单最大化,同时将焦点放在前面的表单上。我玩了一点TForm.BorderStyle := bsNone和ShowWindowAsync(Handle, SW_MAXIMIZE),因为它似乎是唯一的东西,最大化到全屏。然而,这最大化了当前和错误的形式。有没有办法从一个表单中完全最大化(全屏)另一个表单?
TForm.BorderStyle := bsNone
ShowWindowAsync(Handle, SW_MAXIMIZE)
j2qf4p5b1#
回答我自己的问题:在Tom Brunberg的评论的帮助下,我发现虽然ShowWindowAsync(TheOtherForm.Handle, SW_MAXIMIZE)不能使表单完全全屏,但它可以删除"Async"。因此,应当理解,
ShowWindowAsync(TheOtherForm.Handle, SW_MAXIMIZE)
"Async"
TForm.BorderStyle := bsNone; ShowWindow(TheOtherForm.Handle, SW_MAXIMIZE);
在这种情况下是可行的解决方案。
1条答案
按热度按时间j2qf4p5b1#
回答我自己的问题:
在Tom Brunberg的评论的帮助下,我发现虽然
ShowWindowAsync(TheOtherForm.Handle, SW_MAXIMIZE)
不能使表单完全全屏,但它可以删除"Async"
。因此,应当理解,
在这种情况下是可行的解决方案。