有关窗体

Question

小弟不才想请教一个问题：如何在编程中动态实现多个窗体，而且这几个窗体上的控件等都一样？

Answer 1

你用窗体编辑器编辑一个模板窗口，然后再你的MAINFORM中调用这个函数：function Create_Form(num:integer)//num为窗口的数目
var
 i:integer;
begin
  for i:= 0 to num - 1 do
  begin
    form1:= TForm1.create(Application);
  end;
end;

Answer 2

Var
  CreatedForm : TForm;
begin
  CreatedForm := TMdiChildForm.Create(Application);
//  Application.CreateForm(TFrmNew,CreatedForm);
  CreatedForm.FormStyle := fsMdiChild;
  CreatedForm.Show;

Answer 3

  CreatedForm := TMdiChildForm.Create(Application);
  CreatedForm.FormStyle := fsMdiChild;
  CreatedForm.Show;