如何保证一个MDI子窗口一直最大化(100分)

savetime · 2002-12-16

有多个MDI子窗口同时显示在MDI窗口内，但有一个窗口无论其它子窗口的窗口状态如何都 必须是最大化的。 我通过捕获该窗口的WM_WINDOWPOSCHANGING事件中设置WindowState = wmMaximized可以 部分实现，但如果其它某一子窗口状态成为还原时，该窗口也被还原。 谁能解决这一问题。

影 子 · 2002-12-16

在该MDIChild的OnPaint事件中加入代码。

savetime · 2002-12-18

*****

jsxjd · 2002-12-16

试试覆盖MDI子窗口的这个过程： procedure CreateParams(var Params: TCreateParams); override; 通过 Params 来改变窗口的属性（风格） 用一全局变量来控件是否是第一个子窗口。

savetime · 2002-12-16

我感觉控制子窗口的最大最小化要重写主窗口的某个事件(该事件设置子窗口的状态)， 但我不知道是哪个事件。

stuwe · 2002-12-16

好像不行吧!

影 子 · 2002-12-16

[?] 被骂了。看来以后要多订邮件，不然被骂了也不知道。[

] 如果我不对，应该指出哪不对啊。 在必须最大化的MDIChild的OnPaint事件中 WindowState := wsMaximized

savetime · 2002-12-16

>被骂了。看来以后要多订邮件，不然被骂了也不知道。[

] >如果我不对，应该指出哪不对啊。 >在必须最大化的MDIChild的OnPaint事件中 >WindowState := wsMaximized 对不起，我最近吃多了辣椒。 你的方法根本行不通，你自己试试。 即使我不试验，你的方法也是非常不可取的，OnPaint事件太频繁被调用，怎么可能在这里 最大化？不考虑根本原理的程序员何以能写出高质量的程序？

wlmmlw · 2002-12-16

//一个窗口无论其它子窗口的窗口状态如何都必须是最大化的。 如果一个始终是最大化的，那么你是如何操作其它子窗口的？

影 子 · 2002-12-16

说得好！ 如果我能给你代码，那代码就能实现所要的功能。至少从原理上说是可以实现的。 加上判断语句吧。   if WindowState <> wsMaximized then     WindowState := wsMaximized;

hbwyq · 2002-12-16

在必须最大化的MDIChild的OnResize事件中 WindowState := wsMaximized

b51 · 2002-12-16

不知道这样可不可以 WindowState := wsMaximized 然后，去掉窗体的最小化

影 子 · 2002-12-16

TImage能保存原有的图像，就是在WM_paint中实现。 如果觉得不好，就试试下面方法。   private     { Private declarations }     procedure Test(var Msg: TWMSize);message WM_SIZE; procedure TForm2.Test(var Msg: TWMSize); begin   inherited;   if WindowState <> wsMaximized then     WindowState := wsMaximized; end;

savetime · 2002-12-16

》如果一个始终是最大化的，那么你是如何操作其它子窗口的？ 我先建立一个必须最大化的子窗口，然后建立一个子窗口，让它的状态为还原 或最小化，该最大化窗口状态必须仍为最大化，但未Active罢了。 天心ERP的界面就是这样。

savetime · 2002-12-16

》  if WindowState <> wsMaximized then 》    WindowState := wsMaximized; 写WindowState属性时Forms.pas会判断 WindowState 是否需要设置。 说WM_SIZE事件的人都没有考虑原理，我在问题中已经写了WM_WINDOWPOSCHAHGING，其它 判断窗口大小的事件有什么用？

jsxjd · 2002-12-16

在 Params  中不让它改变大小，不就行了。

影 子 · 2002-12-17

是的。不应该在改变大小后再做。[

]

savetime · 2002-12-17

to jsxjd, 如何做?

shenloqi · 2002-12-17

http://loqi.myetang.com/down/mdi.zip 我的这个程序（包含源码）是为了解答一位富翁朋友而作的，完全可以完成你的要求 这个Demo是用一个网页作为MDI的背景的，并且还可以点击网站链接。 你的要求其实比这个简单多了，看看吧

LiChaoHui · 2002-12-17

可以让这个窗口一直占据客户区的全部， 并且让它没有窗口边框和标题栏（通过CreateParams）， 在PB中加MDI背景往往就是这样的

如何保证一个MDI子窗口一直最大化(100分)

savetime

Unregistered / Unconfirmed

影 子

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

jsxjd

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

stuwe

Unregistered / Unconfirmed

影 子

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

wlmmlw

Unregistered / Unconfirmed

影 子

Unregistered / Unconfirmed

hbwyq

Unregistered / Unconfirmed

b51

Unregistered / Unconfirmed

影 子

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

jsxjd

Unregistered / Unconfirmed

影 子

Unregistered / Unconfirmed

savetime

Unregistered / Unconfirmed

shenloqi

Unregistered / Unconfirmed

LiChaoHui

Unregistered / Unconfirmed

Similar threads

影子

影子

影子

影子

影子