delphi中怎么定义公共变量？

Question

我以前是做VB6的，现在改学DELPHI。过去可以用public 变量名定义一个公共变量，在DELPHI中怎么实现这一功能？新手，感觉比较笨，请指教！

Answer 1

还有：
var
  frmCheckPEPB: TfrmCheckPEPB;
  Param1:Integer;//全局，其他use本unit的地方也可以用implementationvar Param2:Integer;//全局，仅本unit全局。

Answer 2

Var区块里定义的就是全局变量在接口部分下的其他单元引用后可见 执行区块的仅本单元可见

Answer 3

也可以在public或者private中定义，定义在public的话所有的单元都可以访问，private的话只有本单元可以访问

Answer 4

unit U_Main;
interfaceuses
  SysUtils, Controls, Forms, Classes, Windows, DB, StdCtrls, ExtCtrls,
  Messages, ImgList, ToolWin, ComCtrls, Dialogs, ExtDlgs;type
  TF_Main = class(TForm)
    btnTest: TButton;
    btnClose: TButton;
    edtCount: TEdit;
    
    procedure btnCloseClick(Sender: TObject);
  private  public
    procedure AddMsg(sMsg: string);
    procedure PrintArray(data: array of integer);
  end;var
  F_Main: TF_Main;  //系统自动添加的全局变量，可以删掉，如果是应用的主窗口，不能删
  sParam: string;   //自定义的全局变量implementation{$R *.dfm}uses
  DateUtils;procedure TF_Main.btnCloseClick(Sender: TObject);
begin
  Close;
end; end.