RTFormwork/public10/design/U_globalVar.pas

26 lines
398 B
ObjectPascal
Raw Normal View History

2024-07-07 09:35:27 +08:00
unit U_globalVar;
interface
uses
Messages;
var
gUserName:string;
gUserId:string;
gDllFileName :string;
gDllFileCaption :string;
gConString:string ;
gIsCanDesign:Boolean;
2024-10-12 10:45:24 +08:00
gGridNativeSet:boolean;
2024-08-20 09:43:44 +08:00
gFontSize:integer;
2024-10-30 13:45:23 +08:00
gFontName:string;
2024-10-12 10:45:24 +08:00
gIsUseSkin:boolean;
gStructVer:string;
2024-11-27 14:57:52 +08:00
gSystemId:string;
gIsYsUse:boolean;
2024-07-07 09:35:27 +08:00
const
WM_CloseForm = WM_USER + 100 ;
implementation
end.