delphi 中是否能定义类似于 pb 中的全局变量！如果能该怎么定义？在线等。。。。。

Question

在单元的开始部分的interface处定义变量，其它的单元只要uses了这个单元就可以用这个变量了

Answer 1

delphi 中是否能定义类似于 pb 中的全局变量！如果能该怎么定义？？？？？
如果不能那程序中怎么处理向全局变量这样的数据？？？？不能定义全局变量吗？

Answer 2

具体说说你要达到什么目的
delphi可以定义全局变量
举个例子
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB, StdCtrls, DBTables, ComCtrls, ExtCtrls, Mask, DBCtrls;
type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
    // 此处定义变量其他单元（Unit）和子类可以调用
  end;var
  Form1: TForm1;
  // 此处定义变量其他单元（Unit）可以调用
implementationvar
  // 此处定义变量本单元可以调用也就是说在接口处interface定义的变量其他单元可以调用，在实现处implementation定义的变量只能本单元调用，你可以根据需要灵活运用，建议做一个模块专门定义全局变量，这样方便你维护

Answer 3

很复杂，模糊！
很复杂，模糊！
很复杂，模糊！我觉得有些时候有一个全局变量比较方便；“建议做一个模块专门定义全局变量，这样方便你维护”这个模块是用form,datamodle,unit中的任何一个来做吗？我要是把变量和函数声明在progrom单元，那么该怎样调用，另外在progrom单元声明的变量是否在其他任何单元都可见？？？？

Answer 4

可以新建一个单元（UNIT)在里面定义全局变量，然后其它单元引用（uses)它，在调用的时候，直接引用变量就可。

Answer 5

最好在unit中定义，其他单元只要use这个单元：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB, StdCtrls, DBTables, ComCtrls, ExtCtrls, Mask, DBCtrls;
此处定义变量,任何单元都可以引用这个变量
type