不用MDI，怎样同时打开多个窗口？

Question

如题。

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var F:TForm1;
begin
f:=TForm1.Create (self);
    f.Parent := Self;
    f.Show;
end;

Answer 2

YourFrm: Tform;
if not Assinged(YourFrm) then
begin
  YourFrm := Tform.Create(Application);
  YourFrm.Show;
end;

Answer 3

上面有错误：
 Assinged(YourFrm) ---------> Assigned(yourFrm);
:) 不好意思

Answer 4

为什么我用Show方法打开一个Form,另一个会消失了呢？（估计到主画面的下面去了。}

Answer 5

另一个消失是到下面去了吧，没用CLOSE是关不了窗口的，不要把窗口的position属性设成poDesigned，用poDefault试试