关于MDI窗口(50分)

淡

淡如水

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #1

我做了一个MDI的程序，设置MDIChild的position属性为MainFormCenter，如果没加工具条
则子窗口显示在主窗口中间，可是加了工具条，如果子窗口大点，子窗体就显示在主窗口偏
下了，在子窗口中下面一排按钮就看不到了，而子窗口上面还空了好多，要用鼠标移动子窗
口才显示出来按钮，这样操作很不方便，这怎么解决？

 

L

lb_icesea79

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #2

Child:TMDIForm;
Child.top:=MainForm.ClientHight div 2 -??
Child.width:=MainForm.ClientWidth div 2 -??

 

B

beyondair

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #3

把position设置为 poDesigned试试，设计时就调好位置

 

淡

淡如水

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #4

lb_icesea79兄：

我看不明白：（

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #5

//Form1是主窗体，Form2是子窗体
procedure TForm1.Button1Click(Sender: TObject);
begin
if AssignEd(Form2) then
Exit;
Form2 := TForm2.Create(Self);
with Form2 do
begin
Left :=(Form1.ClientWidth-Width) div 2; //子窗体的左边界
Top :=(Form1.ClientHeight-Height) div 2 -20;//子窗体的上边界,后面的20可以调整为任意数
Show;
end;

end;

 

徐

徐凤华

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #6

gz