delphi中定义全局变量

Question

我现在有三个form，分别是1，2，3
我想在form1中设置一个全局变量，在form2中给全局变量赋值，在form3中使用这个form2所赋的值
这个东东怎么实现？？？？

Answer 1

不好用啊，我把form1变成公用的unit，之后我在public中设置了变量，但是依然不好用。

Answer 2

var
  Form1: TForm1;
  s: string;在这里设置变量

Answer 3

但是怎么引用了，比如，我在form2中把公共unit给uses进来，然后直接使用变量s提示没有定义，如果使用unit.s的话，那个s出不来……

Answer 4

这种方法可行具体实现为
使用new unit创建一个sysPublic单元(不需要创建窗体)
然后在该单元中定义全局变量
在使用全局变量的单元中引用sysPublic单元即可sysPublic单元的文件sysPublic.pas的内容格式大致如下
unit sysPublic;interface
 uses 
  //global variables
 var
  s:string='';
  //global functions  //global proceduresimplementation
//implement the functions and procedures