//////////////////////////////////////////////////////////////////////////////
//
// FUNCTION: OnFirstUIBefore
//
// EVENT: FirstUIBefore event is sent when installation is run for the first
// time on given machine. In the handler installation usually displays
// UI allowing end user to specify installation parameters. After this
// function returns, FeatureTransferData is called to perform file
// transfer.
//
///////////////////////////////////////////////////////////////////////////////
function OnFirstUIBefore()
number nResult,nSetupType;
number nResult1;
string sSetupType;
string szTitle, szMsg;
string szLicenseFile, szQuestion;
string szName, szCompany;
STRING szSQLsvr,szSQLusr,szSQLpwd,svSQLsvr,svSQLusr,svSQLpwd;
string szFile;
string szTargetPath;
string szDir;
string szfolder;
string szFeatures, szTargetdir;
number nLevel;
LIST listStartCopy;
LIST list;
number nvSize;
number nUser;
string svSerial;
string szField1,szField2;
number svEdit1,svEdit2,nOpt;
STRING szServerIP,szServerPort,szServerIPDefault,szServerPortDefault;
begin
// TO DO: if you want to enable background, window title, and caption bar title
SetTitle( @PRODUCT_NAME, 24, WHITE );
SetTitle( @PRODUCT_NAME, 0, BACKGROUNDCAPTION );
Enable( FULLWINDOWMODE );
Enable( BACKGROUND );
SetColor(BACKGROUND,RGB (0, 128, 128));