MDI程序的最大化显示(50分)

E

eastweast

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-11

• #1

MDI程序中，如果有一个ChildForm最大化显示，如果再显示另外一个ChildForm时，则
最大化显示的Form会自动恢复原型（不再最大化显示），且其位置在右下角，如何使其
显示在MDIForm的正中间？

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-11

• #2

动态创建的子窗口不会出现你说的情况啊。
当一个子窗口最大化时，再显示另外一个窗口时，原来那个窗口在新显示窗口的后边，看不到的。

 

落

落木潇潇

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-11

• #3

同意miaofeng
〉如何使其显示在MDIForm的正中间？
其--指的什么？最小化图标？or ChildForm

 

C

cheylin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #4

有吗？

 

E

eastweast

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #5

这样吧,具体一点.子窗体如何定位?

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #6

如果让子窗口打开时在主窗口的中央，在子窗口的OnShow中：
procedure TForm2.FormShow(Sender: TObject);
begin
Self.Top := (Form1.ClientHeight - Self.Height) div 2;
Self.Left := (Form1.ClientWidth - Self.Width) div 2;
end;

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-12

• #7

其实写在子窗口的OnActivate中更好：）
procedure TForm2.FormActivate(Sender: TObject);
begin
Self.Top := (Form1.ClientHeight - Self.Height) div 2;
Self.Left := (Form1.ClientWidth - Self.Width) div 2;
end;

 

E

eastweast

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-18

• #8

多人接受答案了。