Delphi之变量

全局变量和全局函数：

写在interface后面属于整个工程的,
写在implementation后面属于本单元的.
写在public后面属于本窗体

===========

1、

就如网友所说

File->new->unit,先新建一个单元文件，然后取一个名字，我的取名为U_common。

U_common的代码如下：

unit U_common;

interface

uses Forms,Classes,Windows,Controls;//这里要根据实际需要添加相应的类。

 

var

  pub_username : string;    //用户姓名

  pub_userId : string;          //用户ID
  pub_userRights : string;   //用户权限
  pub_userGrade : string;   //用户级别

 

implementation

 

end;

 

然后你在用户登录界面的users 部分引用u_common

然后在用户登录成功后的事件中写如下代码：

  with Adoquery1 do

  begin

    Close;

    sql.clear;

    //users 是你实际的用户表名    E_userid.text 是用户登录界面输入用户id的编辑框名称 

    sql.add('SELECT * FROM USERS WHERE USERID = '''+E_userid.text+''' AND PASSWORD = '''+E_password.text+'''');

    open;

    if RecordCount > 0 then

    begin

      pub_username  := Adoquery1.FieldByName('username').Asstring;

      pub_userId        := Adoquery1.FieldByName('userid').Asstring;

      pub_userRights := Adoquery1.FieldByName('userrights').Asstring;
      pub_userGrade := Adoquery1.FieldByName('usergrade').Asstring;

    end;

  end;

 

最后，你想在那个窗体调用已登陆信息，比如要取用户名或用户id

那么就在本窗体的Uses 中引入 U_common,然后直接将pub_username  pub_userid等全局变量赋值给相应的控件或者变量就ok了！

 

2、

通常按照变量声明的范围，可以分为：全局变量，类变量，局部变量。

全局变量：是指在类外声明的变量，通常这种变量时在整个工程内有效的，也就是说在整个工程中的类都可以使用。该变量的生存周期是在工程创建时有效，工程销毁时销毁。

类变量：是指在类中声明的变量，这种变量在类中的方法都可以使用。其生命周期是在类创建时有效，类销毁时销毁。

局部变量：是指在方法内部声明的变量，这种变量只能在方法内部使用。其生命周期也是在方法内部有效，当方法调用结束后，其内部所声明的变量也随之销毁。

 

 

unit AAAA;

interface

uses

    windows, Messages, SysUtils;

 

type

TForm1=Class(TForm)

  　　Edit1 : TEdit;

  　　Label1 : TLabel;

  　　Button1 : TButton;

  　　Button2 : TButton;

  　　Button3 : Tbutton;

  　　procedure Button1Click(Sender : TObject);

  　　procedure Button2Click(Sender : TObject);

  　　procedure Button3Click(Sender : TObject);

　　private

　　　{Private declarations}

　　　Name : String;  //类变量；

　　public

   　　{Public declarations}

　　end;

   Var

　　Form1 : TForm;

　　Name : String;//全局变量。

   implementation

　　{$R *.dfm}

　procedure TForm1.Button1Click(Sender : TObject);

　var

　　Name : String; //局部变量；

　begin

　　 Name := '局部变量';

　　 Edit1.Text := Name;

　end;

 end.

 

 

{{

interface中的var与TYPE里的PUBLIC里面定义的变量有何区别.
在interface中声明一个变量时,
如声明一个变量FLAG:Boolean;可写在var里,
也可写在TYPE里的PUBLIC里,
作用好像都是可以被其它单元引用,有什么区别呢?

------解决方案--------------------
类成员变量与全局变量的区别
------解决方案--------------------
如果没有特殊的理由，最好写在类成员中
------解决方案--------------------
写在类的public中是声明为类的成员变量；在Interface部分用Var声明的是其他单元可引用的全局变量。在以往的面向过程开发中常使用全局变量用以保存某些信息，在现今的面向对象的开发中最好使用类，避免使用全局变量。

}}}

 

 

3、

1、interface是什么？有什么用？

程序的接口部分 .定义与声明.

2、private和 public是什么 有什么用 有什么区别？

private和 public是作用域, 前者为私有也就是说定义在private中的变量和方法只能在本类中使用, 后者为公布的 公开的 所有的类都可以访问

3、书上说全局变量定义在implementation之后

implementation为程序的实现部分, 全局变量要定义在接口部分 , 也就是定义在implementation之前的var里, 尽量不要使用全局变量

4、private和 public下面定义的函数和过程有区别吗？
这个是不是需要手动打上去 还是像TYPE里一样自动生成的？

函数有返回值, 过程没返回值, 定义好方法后可以用热键ctrl+shift+c 自动生成方法体