初学delphi，请问关于多Form的问题。

Question

我有两个Form，主Form上面有个Button，要使按下Button就显示Form2的内容，请问Button的Onclick事件该怎么写？多谢！先回者先给分。

Answer 1

form2.show;  or   form2.showmodal;

Answer 2

方法同上，但要在implementation下加入如下代码：uses unit2;

Answer 3

可是我已经在unit1.pas中添加了uses unit2；语句，却还报错说Form2没有定义，并且不能编译unit1.pas，怎么回事啊？

Answer 4

按下Alt+F11,选择Unit2.pas,如果Form2是自动生成的直接
Form2.Show //Form2.ShowModal
就行了如果Form2不是自动生成的:
try
  Form2=TFrom2.Create(self);
finally
  Form2.Show
end

Answer 5

procedure TForm1.Q1Click(Sender: TObject);
 begin
   if not assigned(form2)then
         form2:=TForm2.create(application);
   form2.show;
   //table1.Close; end;

Answer 6

form2.show;  or   form2.showmodal;

Answer 7

亲爱的朋友，你现在是否还在花父母的血汗钱？是否喜欢一样东西但不敢问津？是否有心爱的女孩，却因为囊中羞涩而失之交臂？从现在开始无条件送您50元，人人有份！到下面的网址看看吧,利用业余时间,月收入1500元，解决一切问题！网址： http://chinaour.com/?ruying

Answer 8

晕倒，不能给分。总是显示scripy error!从昨晚到现在我已经来结过N次了，郁闷

Answer 9

可是我已经在unit1.pas中添加了uses unit2；语句，却还报错说Form2没有定义，并且不能编译unit1.pas，怎么回事啊？通过上面的话.看来真是够初学的了.
你难道就不能用 Unit2.Pas 里的 Form类名来替换掉 Form2 这个名字吗????

Answer 10

首先在file->use unit中包含unit2;
procedure TForm1.Button1Click(Sender: TObject);
 begin
    form2.show;
 end;