不同unit或者说Form间的参数传递

Question

问题如上，比如说某个unit要调用其他unit所设定的参数．
请高手帮忙．谢谢．

Answer 1

参数？var么？
把var声明放在interface区，然后所有引用这个单元的unit都能用到这个var。如果你说的是编译参数，比如{$Def Delphi7}，那只能一个一个unit去设定。
还有个方法是到Project－>Options的Directories/Conditionals里面的Conditionals设定编译参数，这样整个工程任何unit都会知道这个编译参数，但是这个有个不好的地方时，当你想要换个编译参数时，你得Build整个工程。
使用前面那个方法就不用，它只需要编译有修改过的unit就可以了。各有利弊。

Answer 2

use unit2 比如说你要引用unit2

Answer 3

我也有这个问题，不知如何去做。我在一个工程里，新建一个Thread Object，在该线程里产生随机数，然后想传到其它unit里，利用线程同步，可以实现，但我想在该线程里把定时产生的随机数写到数据库不知该如何操作啦！

Answer 4

在uses 中引用你想传递参数的那个单元

Answer 5

在线程的中USES你要用到的单元。然后在线程中访问你引用到的那个单元的全局变量

Answer 6

user 中引入你要传递参数的单元，
再在你要传递参数的单元中写个公共的函数，在把值通过公共函数传过去就  OK 了，呵呵，很简单！

Answer 7

建一个公用的Unit，里面放那些公用变量的声明或者函数，然后在其它窗体中Uses这个Unit就可以访问了公用变量了

Answer 8

unit1 中　
  public
    { Public declarations }
     var 
       aa:string;
  end;在　unit2中
uses unit1
便可直接調用unit1中參數