怎么把一个form中的一个变量的值返回给另外一个form!

Question

定义全局变量 
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
//在这里定义
implementation{$R *.DFM}end.
在其它单元中的implementation下用uses unit1,就可使用。

Answer 1

可以将全局变量定义在一个pas（可以有from或者没有）中，在要用的窗体中uses这个pas，就可以引用了。—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
I.Maxim := MaximStr;
I.Explain := '可用分不够可以给我发短消息';
I.Desire := '加不加分随你';
—————————————————————————————————

Answer 2

可以将全局变量定义在一个pas（可以有from或者没有）中，在要用的窗体中uses这个pas，就可以引用了。—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
I.Maxim := MaximStr;
I.Explain := '可用分不够可以给我发短消息';
I.Desire := '加不加分随你';
—————————————————————————————————

Answer 3

uses uSubForm;
...
if SubForm.ShowModal = mrOK then
begin
  ShowMessage(SubForm.FileName);
end;

Answer 4

在interface部分（类中除外）定义的变量，都是全局变量，程序中的任何窗口都可以用，只要在uses部分加上变量所在的单元就可以了。不过我习惯于专门建一个单元来定义一些类型和变量，如下所示：Unit Variables;interfacevar
  n1,n2:integer;implementation
end.这样，只要你uses了这样单元，就可以使用n1,n2.--------------------------------------------------------------------
风过西窗客渡舟船无觅处
年年一川新草遥看却似旧

Answer 5

hehe,太好了，原来的一些概念不清楚，现在知道了！谢谢大家了！