unit GinaFunctionDeclare; interface
uses Windows, Messages, SysUtils,Classes,Dialogs,
CommonFunction; {$INCLUDE NTVersion.inc} const
MSGINADLL’msgina.dll’; {$IFNDEF _WINWLX_}
{$define _WINWLX_}
{$ENDIF } {********************************************…