?!·#¥%%

解决方案 »

  1.   

    1.工程的全局变量可以在 type 之前定义;
    2.unit单元变量应该在implementation之后定义;
    3.如果只是用在unit中的一个过程的变量,只需定义在这个过程中就可以了,当然定义在2中也可以,只是浪费罢了。
      

  2.   

    unit Unit1;interfaceuses ...type...var 全局变量: string;implementationprocedure  aa;
    var
      私有变量: string;
    begin
    end;end.
      

  3.   

    unit Unit1;interfacevar
      a: integer;  // 工程内全局变量(其它单元要在uses中加入此单元后才能用)implementationvar
      b: integer;  // 单元内全局变量procedure TForm1.FormCreate(Sender: TObject);
    var
      c: integerl; // 私有变量
    begin
    end;end.