unitglobal.pas

初中成绩录入系统网络版(firebird) firebird下的网络编程

unit UnitGlobal;
//存放全局变量
interface
var
  UserName:String;//存储登陆的用户名
  CurrentAch:String;//当前用户可操作的成绩表
implementation

end.