請問在Form1中用以下方式開啟Form2,如何設定被開啟之表單(Form2)之相對座標於主表單(Form1),就是我希望Form2之座標位置是依據Form而定或改變 procedure TForm1.F3Click(Sender: TObject); begin IF Application.FindComponent('Form2')=nil then Application.CreateForm(TForm2, Form2 ); Form2.SHOWMODAL; End;

Form2.Parent與 Form2.SHOW之方式可以,但開啟Form2後其仍會沿用父系(Form1)之一些ShortCut Key,故我希望能用Form2.SHOWMODAL以能完全自主

開始時設定 Form2 的位置相對於 Form1

procedure TForm1.F3Click(Sender: TObject);
begin
  IF Application.FindComponent('Form2')=nil then 
    Form2 := TForm2.Create(Self);
  Form2.Left := Left   10;
  Form2.Top := Top   10;
  Form2.SHOWMODAL;
End;

你若是用 ShowModel, 使用者將不能移動 Form1 只可以移動 Form2。