如何在两个Form之间传递变量和参数？急！

Question

怎么样才能实现这个过程，
具体要求是，点击form1中的一个按钮以后，弹出form2窗口，同时将form1中的一个变量，或者某个控件的值显示在form2中，另外，还有一个问题就是弹出form2的几种方法，各有什么特点，可否介绍一下，小弟感激不尽！

Answer 1

form1
……
uses
  Unit2;
……
begin
  form2.Edit1.Text := 'aaa';
  form2.Show; (or form2.ShowModal)
end;

Answer 2

在form2中uses form1窗体。
直接在fom2中用fomm1.XXXXX的方式调用。
弹出form2可以用show或showmodal方法。一个弹出的窗口可以切换。一个不可以切换。

Answer 3

谢谢各位，不好意思，再问一下，form.visible：=true；和form.show； 有什么区别么？
完了马上结贴！！！！！！！！！！！！！！！！！！！！！！！！！！！
谢谢谢谢！！

Answer 4

http://expert.csdn.net/Expert/topic/2940/2940088.xml?temp=.3148462

Answer 5

显示有很多种： DELPHI最常用的是：
    SHOW 和SHOWMODAL。
 SHOW，是显示一个窗体，但你可以操作同一个APPLICATION的其他窗体（该操作是指直接用鼠标或键盘）， 而SHOWMODAL 不可以，除非你关掉它。是独占方式的。
  传递参数的问题有很多中，你可以在FORM1的VAR下申明全局变量，在FORM2里 USES一下，就可以直接使用，如果是控件，就得：FORM1。EDIT1； 这样使用。
  DELPHI中的单元UNITS和C#中的名称空间有异曲同工之妙。

Answer 6

form.visible是设置窗体是否显示的属性。form.show。是显示窗体的方法.

Answer 7

两个form就事两个对象，通过属性、方法去实现。

Answer 8

form.show里面调用了form.visible：=true，然后把窗体放在屏幕最前面
---------------
procedure TCustomForm.Show;
begin
  Visible := True;//这就是form.visible：=true
  BringToFront;
end;
-------------
form.visible
-----------
procedure TCustomForm.SetVisible(Value: Boolean);
begin
  if fsCreating in FFormState then
    if Value then
      Include(FFormState, fsVisible) else
      Exclude(FFormState, fsVisible)
  else
  begin
    if Value and (Visible <> Value) then SetWindowToMonitor;
    inherited Visible := Value;
  end;
end;