怎么样在一个Unit里给另外一个Unit里的变量付值

Question

如果另一个在implementation前定义的变量，那么本单元要用时可以在implementation之后
uses unit2;
这样本单元就可以直接使用那个变量 。

Answer 1

主模块form1,unit1,从模块form2,unit2在unit2中的定义变量时：type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    str : string;//在此处定义
    { Public declarations }
  end;var
  Form1: TForm1;
  str1 : string;//或此处
implementation在unit1中use unit2,ide菜单file->use unit....在form1中可用
  form2.str :='aaa';

Answer 2

呵呵，来晚了！！
该说得都让楼上的说了！！！
UP!
UP UP!!
UP UP UP!!!

Answer 3

如果是在GLOBE中全局变量可以直接赋值，如是其他单元则
uses unitiimplementation
   Formi.变量：=‘’；

Answer 4

另外还可以设计一个无窗体的全局单元文件，用于定义全局变量和全局类、结构、过程等，就像Global文件或H文件，其它单元只要引用了该单元，就可直接使用该单元定义的东西。