unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  //全局变量在这里声明,然后在调用这个变量的单元uses本单元
  Form1: TForm1;implementation{$R *.DFM}end.
2。
函数可以单独写在一个单元中,然后再单元的interface下面声明这个函数,在调用的单元uses这个单元

解决方案 »

  1.   

    在接口(interface)处声明变量,其他的单元引用(uses)就可以
      

  2.   

    unit Unit1;
    interface
    uses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
      TForm1 = class(TForm)
      private
        { Private declarations }
      public
        //此处可声明全局变量,在用到的单元.pas的implementation下uses 本单元如:uses unit1;
      end;var  
      Form1: TForm1;
      //此处可声明全局变量,在用到的单元.pas的implementation下uses 本单元如:uses unit1;
    implementation{$R *.DFM}end.
    //最好有各公共单元,存放全局变量,用到时引用该公共单元
      

  3.   

    自己可以建一个公共单元,写一些公共过程,函数,公共变量,
    在其他窗体中的uses下加入该单元
      

  4.   

    可以写一个公用的单元,里面public部分定义所有的变量和函数,然后在使用时只许uses一下就可以了。
      

  5.   

    可以new一个公用单元,在public部分定义全局的变量和函数,在使用时只需user一下这个公用单元就可以了
      

  6.   

    可以new一个公用单元,在public部分定义全局的变量和函数,在使用时只需uses一下这个公用单元就可以了
      

  7.   

    同意楼上观点,只是在USES 时,有两种,一种为interface下的USES,一种为implementation下的USES,前一种为编译时引用,后一种为运行时引用,推荐后一种,