procedure TForm1.ToolButton5Click(Sender: TObject);
begin
end;我初学,很笨!

解决方案 »

  1.   

    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin
     窗体.Show; 
    end; 
      

  2.   

    uses 窗体所在单元;如果该窗体在工程文件中已经create了,那么,可以直接:
    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin
      窗体.Show; 
    end;否则,得先create
    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin
      Application.CreateForm(窗体类名, 窗体实例名);
      窗体.Show; 
    end;
      

  3.   

    Application.CreateForm(窗体类名, 窗体实例名);    麻烦把汉字写成实例  Form的
      窗体.Show; 
      

  4.   

    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin
    Tform1.create(self).show; 
    end; 
      

  5.   

    uses Unit1; 如果该窗体在工程文件中已经create了,那么,可以直接: 
    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin 
      Form1.Show; 
    end; 否则,得先create 
    procedure TForm1.ToolButton5Click(Sender: TObject); 
    begin 
      Application.CreateForm(TForm1, Form1); 
      Form1.Show; 
    end;
      

  6.   

    尽量不要使用Application.CreateForm(TForm1, Form1); 来创建,侯捷的书中专门提到过这个问题,应该这样
    with TForm1.Create(nil) do
    begin
      try
        ShowModal;
      finally
        FreeAndNil(Form1);
      end;
    end;