//////////////////////////////////////////////////////////////////////////////
//
Function:onfirstuiafter
//
Event:firstuiafter event is sent after file transfer, when installation
is run for the "the" "the" given machine. In this event handler
Installation usually displays UI that would inform end user
Installation has been completed successfully.
//
///////////////////////////////////////////////////////////////////////////////
function Onfirstuiafter ()
STRING SzTitle, SZMSG1, SZMSG2, SzOption1, Szoption2,szcmdline;
Number BOPT1, BOpt2;
Begin
szCmdLine = TARGETDIR ^ "Mkwebdir.vbs" + "-C localhost-w 1-v WebApp," + TARGETDIR;
if (launchappandwait ("WScript.exe", szcmdline,wait) < 0) Then
MessageBox ("Cannot establish a Web virtual directory.", SEVERE);
endif
Disable (Statusex);
BOPT1 = FALSE;
BOpt2 = FALSE;
SZMSG1 = sdloadstring (IFX_SDFINISH_MSG1);
SZMSG2 = "";
SzOption1 = "";
SzOption2 = "";
SzTitle = "";
Sdfinishex (SZTITLE,SZMSG1,SZMSG2,SZOPTION1,SZOPTION2,BOPT1,BOPT2);
return 0;
End
//////////////////////////////////////////////////////////////////////////////
//
Function:onmaintuibefore
//
Event:maintuibefore event is sent as end user runs installation that
has already been installed on the machine. Usually this happens
Through Add/remove Programs applet. In the handler installation
Usually displays UI allowing end user to modify existing installation
or uninstall application. After this function returns,
Componenttransferdata is called to perform file transfer.
//
///////////////////////////////////////////////////////////////////////////////
function Onmaintuibefore ()
Number Nresult,nlevel,ntype;
STRING sztitle,szmsg,svdir,szcomponents,svresult,szcaption;
Begin
To do:if your want to enable background, window title, and caption bar title
Settitle (@TITLE_MAIN, white);
Settitle (@TITLE_CAPTIONBAR, 0, backgroundcaption);
SetColor (Background,rgb (0, 128, 128));
Enable (Fullwindowmode);
Enable (BACKGROUND);
///////////////////////////////////////////////////////////////////////////////
//
Function:onmaintuiafter
//
Event:maintuiafter event is sent after file transfer, as end user runs
Installation that has already been installed on the machine. Usually
This happens through Add/remove Programs applet.
In the handler installation usually displays UI that would inform
End user that Maintenance/uninstallation has been completed successfully.
//
///////////////////////////////////////////////////////////////////////////////
function Onmaintuiafter ()
STRING SzTitle, SZMSG1, SZMSG2, SzOption1, SzOption2;
Number BOPT1, BOpt2;
Begin
Disable (Statusex);
BOPT1 = FALSE;
BOpt2 = FALSE;
SZMSG1 = sdloadstring (IFX_SDFINISH_MAINT_MSG1);
SZMSG2 = "";
SzOption1 = "";
SzOption2 = "";
SzTitle = sdloadstring (Ifx_sdfinish_maint_title);
Sdfinishex (SZTITLE,SZMSG1,SZMSG2,SZOPTION1,SZOPTION2,BOPT1,BOPT2);
return 0;
End
///////////////////////////////////////////////////////////////////////////////
//
Function:onmoving
//
Event:moving event is sent when file transfer is started as a
Componenttransferdata call, before any file transfer operations
are performed.
//
///////////////////////////////////////////////////////////////////////////////
function onmoving ()
STRING Szapppath;
Begin
Set LOGO Compliance Application Path
To do:if your application. exe is in a subfolder of TARGETDIR then add subfolder
Szapppath = TARGETDIR;
Regdbsetitem (Regdb_apppath, Szapppath);
Regdbsetitem (Regdb_apppath_default, Szapppath ^ @PRODUCT_KEY);
The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion;
products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the
content of the page makes you feel confusing, please write us an email, we will handle the problem
within 5 days after receiving your email.
If you find any instances of plagiarism from the community, please send an email to:
info-contact@alibabacloud.com
and provide relevant evidence. A staff member will contact you within 5 working days.