unit Unit2 ;//<-----你添加這個幹嘛啊?

解决方案 »

  1.   

    我不是要创建Form2么,不要这个么?这不是跟头文件类似的意思么?
    那要怎么弄啊,我不太懂,就是凭感觉
      

  2.   


    以上的问题有点错误,Form1的Button事件中代码是这样的:
    procedure TForm3.Button2Click(Sender: TObject);
    begin
        
        Application.CreateForm(TForm2, Form2);
    end;
      

  3.   

    1,unit 是保留字,而且一個單元文件只能有一個Unit,而且的而且,Unit 必須作為第一個關鍵字用;
    2,你是引用unit2單元,而你也已經做到了,uses Unit2;
    3,你要的  
    implementation
    uses Unit2;{下面是實現代碼,和BCB很相近吧?}
    procedure TForm1.Button1Click(Sender: TObject);
    begin
      Application.CreateForm(TForm2, Form2);
      form2.Show;
    end;
      

  4.   


    TForm *frm=new TForm2(Application);
    frm->ShowModal();改寫完整的是這樣procedure TForm1.Button1Click(Sender: TObject);
    var
      frm: TForm2;
    begin
      frm := TForm2.Create(Application);
      frm.ShowModal;
    end;