RTFormwork/public10/design/U_globalVar.pas
2024-11-27 14:49:17 +08:00

24 lines
358 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;
gStructVer:string;
const
WM_CloseForm = WM_USER + 100 ;
implementation
end.