18 lines
176 B
ObjectPascal
18 lines
176 B
ObjectPascal
|
unit U_globalVar;
|
||
|
|
interface
|
||
|
|
uses
|
||
|
|
Messages;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
var
|
||
|
|
gUserName:string;
|
||
|
|
gUserId:string;
|
||
|
|
gDllFileName :string;
|
||
|
|
const
|
||
|
|
WM_CloseForm = WM_USER + 100 ;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
end.
|