29 lines
487 B
ObjectPascal
29 lines
487 B
ObjectPascal
unit U_globalVar;
|
||
interface
|
||
uses
|
||
Messages;
|
||
|
||
var
|
||
gUserName:string;
|
||
gUserId:string;
|
||
gDllFileName :string;
|
||
gDllFileCaption :string;
|
||
gConString:string ;
|
||
gIsCanDesign:Boolean;
|
||
gGridNativeSet:boolean;
|
||
gFontSize:integer;
|
||
gFontName:string;
|
||
gIsUseSkin:boolean;
|
||
gIsNoUseBuffer:boolean;
|
||
gStructVer:string;
|
||
gSystemId:string;
|
||
gIsYsUse:boolean;
|
||
gTeamWorker:string;
|
||
gQueryTime:integer; //0按日；1：按月；
|
||
const
|
||
WM_CloseForm = WM_USER + 100 ;
|
||
|
||
implementation
|
||
|
||
end.
|