form2在form1显示的问题

Question

form2.top := form1.width/2;
form2.left:= form1.height/2;

Answer 1

to:cszhz(丑小鸭)　
上次我就是用你那样的方法做，好象不行！

Answer 2

to:cszhz(丑小鸭)　
我刚才试了一下,有错误,我用的是delphi 5.

Answer 3

to:biu(小兔子)
你能说的详细一点吗!　

Answer 4

form2.top := Top + (height div 2);
form2.left:= left +(width div 2);

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
begin
   form2.top := Top + (height div 2);
   form2.left:= left +(width div 2);
   form2.ShowModal;
end;

Answer 6

to :flying_fish(飞鱼)
还是不对呀!,初始时我用的form1和form2是一样大的,我试了一下,这样只是把form2移到了右下脚,并没有改变form2的大小,也就是说form2的其他地方还是看的见得!

Answer 7

procedure TForm1.Button1Click(Sender: TObject);
begin
  form2.top := Top + (height div 2);
  form2.left:= left +(width div 2);
  form2.width:=Width div 2;
  form2.height:=height div 2;
  form2.ShowModal;
end;

Answer 8

to :flowersun(song)
谢谢你~!可以了,结帖!

Answer 9

to :flowersun(song)
这个方法到是可以了,我想再问一下,如果我要显示的是在form1中右半边的3/4,该如何,我刚才试了一下,　
form2.top := Top + (height*3 div 4);
  form2.left:= left +(width div 2);
  form2.width:=Width div 2;
  form2.height:=height*3 div 4;
好象不行!
  

Answer 10

form2.top := Top + (height div 4)*3;
  form2.left:= left +(width div 2);
  form2.width:=Width div 2;
  form2.height:=(height div 4)*3;
也不行呀!

Answer 11

to:Mozh(Alex)
你能说的详细一点吗!我没有用过!　

Answer 12

to:Netix(雷霆)　
你详细的说说看呀!怎么个用法!

Answer 13

procedure TForm1.Button1Click(Sender: TObject);
begin
  form2.top := Top + (height div 2);
  form2.left:= left +(width div 2);
  form2.width:=Width div 2;
  form2.height:=height div 2;
  form2.Parent:=form1;
  form2.Show;
end; 

Answer 14

to :ljun1979(江南云)　
我用的d6是可以得。

Answer 15

用dock多好，在form1上面放置一个panel，将panel的docksite属性设置为true，然后将form2 dock到panel上，改变panel的位置，就可以改变form2的位置了。这样出来的效果就是form2嵌入到了form1

Answer 16

procedure TForm1.Button1Click(Sender: TObject);
beginform2.parent:=form1;//这个是关键！！！！！！！！！！！！！！！！！！！！！  form2.top := Top + (height div 2);
  form2.left:= left +(width div 2);
  form2.width:=Width div 2;
  form2.height:=height div 2;
  form2.Parent:=form1;
  form2.Show;
end; 

Answer 17

为什么必须用Form2? 用一个PictureBox代替掉Form2吧。

Answer 18

是的.
可以用 
Form1.Parent:=Form2;
Form1.Show;
就可以看到Form1显示在Form2中了。当然，也可用MDI了。
可以结了。

Answer 19

问个菜问题：form用frame怎么用啊，哪里设置？（不耻下问，嘿嘿）

Answer 20

高手一定要进来看，好多人期待您的回答（（关于DELPHI的RES文件））
http://www.csdn.net/Expert/topic/509/509268.shtm