InstallShield2008脚本安装制作方法Setup

1. //===========================================================================
2. //
3. //  File Name:    Setup.rul
4. //
5. //  Description:  Blank setup main script file
6. //
7. //  Comments:     Blank setup is an empty setup project. If you want to
8. //                create a new project via. step-by step instructions use the
9. //                Project Assistant.
10. //
11. //===========================================================================
13. // Included header files ----------------------------------------------------
14. #include "ifx.h"
16. //原型创建卸载快捷方式
17. prototype CreateUninstallShortcut();   
19. //注册第三方DLL函数
20. prototype CallRegsterThirdDLL();   
22. prototype CallUnRegsterThirdDLL(); 
24. //先安装的组件函数
25. prototype SetupPreCompontDLLorExe();
26. //---------------------------------------------------------------------------                                                                        
27. // OnFirstUIBefore
28. // 第一个窗体之前  执行事件
29. // First Install UI Sequence - Before Move Data
30. //
31. // The OnFirstUIBefore event is called by OnShowUI when the setup is
32. // running in first install mode. By default this event displays UI allowing
33. // the end user to specify installation parameters.
34. //
35. // Note: This event will not be called automatically in a
36. // program...endprogram style setup.
37. //---------------------------------------------------------------------------
38. function OnFirstUIBefore()
39.     number  nResult, nLevel, nSize, nSetupType;
40.     string  szTitle, szMsg, szOpt1, szOpt2, szLicenseFile;
41.     string  szName, szCompany, szTargetPath, szDir, szFeatures;
42.     BOOL    bLicenseAccepted;   
43. begin   
44.    
45.     nSetupType = COMPLETE;  
46.     szDir = TARGETDIR;
47.     szName = "";
48.     szCompany = "";
49.     bLicenseAccepted = FALSE;  
50.     
51.     //调用 先安装的组件函数  
52.     SetupPreCompontDLLorExe();  
53.     
54.       
55. // Beginning of UI Sequence
56. Dlg_Start:
57.     nResult = 0;
59. Dlg_SdWelcome:
60.     szTitle = "";
61.     szMsg = "";
62.     //{{IS_SCRIPT_TAG(Dlg_SdWelcome)
63.     nResult = SdWelcome( szTitle, szMsg );
64.     //}}IS_SCRIPT_TAG(Dlg_SdWelcome)
65.     if (nResult = BACK) goto Dlg_Start;
67. Dlg_SdLicense2:
68.     szTitle = "";
69.     szOpt1 = "";
70.     szOpt2 = "";
71.     //{{IS_SCRIPT_TAG(License_File_Path)
72.     szLicenseFile = SUPPORTDIR ^ "Eula.rtf";
73.     //}}IS_SCRIPT_TAG(License_File_Path)
74.     //{{IS_SCRIPT_TAG(Dlg_SdLicense2)
75.     nResult = SdLicense2Rtf( szTitle, szOpt1, szOpt2, szLicenseFile, bLicenseAccepted );
76.     //}}IS_SCRIPT_TAG(Dlg_SdLicense2)
77.     if (nResult = BACK) then
78.         goto Dlg_SdWelcome;
79.     else
80.         bLicenseAccepted = TRUE;
81.     endif;
83. Dlg_SdRegisterUser:
84.     szMsg = "";
85.     szTitle = "";
86.     //{{IS_SCRIPT_TAG(Dlg_SdRegisterUser)   
87.    // nResult = SdRegisterUser( szTitle, szMsg, szName, szCompany );
88.     //}}IS_SCRIPT_TAG(Dlg_SdRegisterUser)
89.     if (nResult = BACK) goto Dlg_SdLicense2;
91. Dlg_SetupType2:   
92.     szTitle = "";
93.     szMsg = "";
94.     nResult = CUSTOM;
95.     //{{IS_SCRIPT_TAG(Dlg_SetupType2)   
96.     nResult = SetupType2( szTitle, szMsg, "", nSetupType, 0 );     //完整/自定义安装
97.     //}}IS_SCRIPT_TAG(Dlg_SetupType2)
98.     if (nResult = BACK) then
99.         goto Dlg_SdRegisterUser;
100.     else
101.         nSetupType = nResult;
102.         if (nSetupType != CUSTOM) then
103.             szTargetPath = TARGETDIR;
104.             nSize = 0;
105.             FeatureCompareSizeRequired( MEDIA, szTargetPath, nSize );
106.             if (nSize != 0) then      
107.                 MessageBox( szSdStr_NotEnoughSpace, WARNING );
108.                 goto Dlg_SetupType2;
109.             endif;
110.         endif;   
111.     endif;
113. Dlg_SdAskDestPath2:
114.     if ((nResult = BACK) && (nSetupType != CUSTOM)) goto Dlg_SetupType2;
115.     szTitle = "";
116.     szMsg = "";
117.     if (nSetupType = CUSTOM) then
118.                 //{{IS_SCRIPT_TAG(Dlg_SdAskDestPath2)   
119.         nResult = SdAskDestPath2( szTitle, szMsg, szDir );
120.                 //}}IS_SCRIPT_TAG(Dlg_SdAskDestPath2)
121.         TARGETDIR = szDir;
122.     endif;
123.     if (nResult = BACK) goto Dlg_SetupType2;
125. Dlg_SdFeatureTree: 
126.     if ((nResult = BACK) && (nSetupType != CUSTOM)) goto Dlg_SdAskDestPath2;
127.     szTitle = "";
128.     szMsg = "";
129.     szFeatures = "";
130.     nLevel = 2;
131.     if (nSetupType = CUSTOM) then
132.         //{{IS_SCRIPT_TAG(Dlg_SdFeatureTree)    
133.         nResult = SdFeatureTree( szTitle, szMsg, TARGETDIR, szFeatures, nLevel );
134.         //}}IS_SCRIPT_TAG(Dlg_SdFeatureTree)
135.         if (nResult = BACK) goto Dlg_SdAskDestPath2;  
136.     endif;
138. Dlg_SQLServer:
139.     nResult = OnSQLServerInitialize( nResult );
140.     if( nResult = BACK ) goto Dlg_SdFeatureTree;
142. Dlg_ObjDialogs:
143.     nResult = ShowObjWizardPages( nResult );
144.     if (nResult = BACK) goto Dlg_SQLServer;
145.     
146. Dlg_SdStartCopy2:
147.     szTitle = "";
148.     szMsg = "";
149.     //{{IS_SCRIPT_TAG(Dlg_SdStartCopy2) 
150.     nResult = SdStartCopy2( szTitle, szMsg );   
151.     //}}IS_SCRIPT_TAG(Dlg_SdStartCopy2)
152.     if (nResult = BACK) goto Dlg_ObjDialogs;
154.     // Added in 11.0 - Set appropriate StatusEx static text.
155.     SetStatusExStaticText( SdLoadString( IDS_IFX_STATUSEX_STATICTEXT_FIRSTUI ) );
157.     return 0;
158. end;
160. //定义 先安装的组件函数
161. function SetupPreCompontDLLorExe()   
162. string  szDotNetFx,SzLanguagePack; 
163. string  szAERRealVersion,szAERSpNumber; 
164. string  svNumber;
165. number  nvType,nvSize;
166. string szOfficeLastProduct,svOfficeValue;  
167. string szWinInstallerExe;
168. begin 
169.     //安装Window Installer 3.1   有哪些任兄知道的说一下谢谢!
170.     //szWinInstallerExe=SUPPORTDIR ^ "WINDOWSINSTALLER-KB893803-V2-X86.EXE";
171.     //RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );   
172.     //if (RegDBKeyExist ("SOFTWARE//Classes//Msi.Package" ) < 0) then 
173.     //  SdShowMsg("正在安装Window Installer 3.1,请稍候......",TRUE); 
174.     //  LaunchAppAndWait(szWinInstallerExe,"",WAIT);  
175.     //endif;
176.         
177.     
178.     //安装.NetFramework2.0
179.     szDotNetFx = SUPPORTDIR ^ "dotnetfx.exe";
180.     SzLanguagePack = SUPPORTDIR ^ "langpack.exe";
181.     //szMDAC = SUPPORTDIR ^ "MDAC2.8.EXE";   //v1.1 
182.     RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );   
183.     if (RegDBKeyExist ("SOFTWARE//Microsoft//.NETFramework//policy//v2.0" ) < 0) then             
184.         SdShowMsg("正在安装.Net2.0运行环境,请稍候......",TRUE); 
185.         LaunchAppAndWait(szDotNetFx,"",WAIT);
186.         LaunchAppAndWait(SzLanguagePack,"",WAIT);    
187.     endif;
188.     //安装MDAC2.8
189.     //RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );   
190.     //if (RegDBKeyExist ("SOFTWARE//Classes//MDACVer.Version.2.80" ) < 0) then     
191.     //  LaunchAppAndWait(szMDAC,"",WAIT);    
192.     //endif;   
193.     //判断是否安装了ArcEngine9.2+SP3补丁包 
194.     szAERRealVersion="9.2"; 
195.     szAERSpNumber="3";
196.     nvSize=-1;
197.     RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );   
198.     if (RegDBGetKeyValueEx ("SOFTWARE//ESRI//ArcGIS Engine Runtime","RealVersion",nvType,svNumber,nvSize) < 0) then 
199.         MessageBox ("未安装ArcEngine9.2+SP3补丁包,请本安装完成后再安装!", SEVERE);
200.     else
201.         if(svNumber!=szAERRealVersion) then
202.             MessageBox ("未安装ArcEngine9.2+SP3补丁包,请本安装完成后再安装!", SEVERE); 
203.         else
204.             if(RegDBGetKeyValueEx ("SOFTWARE//ESRI//ArcGIS Engine Runtime","SPNumber",nvType,svNumber,nvSize) < 0) then  
205.                MessageBox ("未安装ArcEngine9.2+SP3补丁包,请本安装完成后再安装!", SEVERE);
206.             else    
207.                if(svNumber!=szAERSpNumber) then
208.                     MessageBox ("未安装ArcEngine9.2+SP3补丁包,请本安装完成后再安装!", SEVERE);
209.                endif; 
210.             endif; 
211.         endif;
212.     endif;  
213.     //判断是否安装了Microsoft Office 2003 V11.0+SP2及以上版本 
214.     szOfficeLastProduct="11.0.7969.0";  //sp2 版本号    
215.     RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE ); 
216.     if (RegDBKeyExist ("SOFTWARE//Microsoft//Office//11.0//Common//ProductVersion" ) < 0) then             
217.         MessageBox ("未安装Microsoft Office 2003 V11.0+SP2及以上版本,请本安装完成后再安装!", SEVERE); 
218.     else
219.         if(RegDBGetKeyValueEx ("SOFTWARE//Microsoft//Office//11.0//Common//ProductVersion","LastProduct",nvType,svOfficeValue,nvSize) < 0) then 
220.             MessageBox ("未安装Microsoft Office 2003 V11.0+SP2及以上版本,请本安装完成后再安装!", SEVERE); 
221.         else    
222.            if(svOfficeValue<szOfficeLastProduct) then
223.                 MessageBox ("未安装Microsoft Office 2003 V11.0+SP2及以上版本,请本安装完成后再安装!", SEVERE); 
224.            endif; 
225.         endif;
226.     endif; 
227. end; 
229. //注册第三方DLL函数
230. function CallRegsterThirdDLL() 
231. string szDevExpress_Dll,szmicrosoft_mshtml_dll;
232. begin
233.     //安装完后注册 DevExpress_Dll
234.     szDevExpress_Dll = TARGETDIR ^ "//devexpress_dll//reg.bat";
235.     //SdShowMsg("正在注册 DevExpress_Dll,请稍候......",TRUE); 
236.     //Delay(2);
237.     if(LaunchAppAndWait(szDevExpress_Dll,"",WAIT)<0) then
238.     endif;     
239.     
240.     //安装完后注册 microsoft_mshtml_dll
241.     szmicrosoft_mshtml_dll = TARGETDIR ^ "//microsoft_mshtml_dll//reg.bat";
242.     //SdShowMsg("正在注册 microsoft_mshtml_dll，请稍候......",TRUE); 
243.     //Delay(2);
244.     if(LaunchAppAndWait(szmicrosoft_mshtml_dll,"",WAIT)<0) then
245.     endif;  
246. end;
248. //调用 卸载第三方组件
249. function CallUnRegsterThirdDLL() 
250. string szDevExpress_Dll,szmicrosoft_mshtml_dll;
251. begin
252.     //安装完后注册 DevExpress_Dll
253.     szDevExpress_Dll = TARGETDIR ^ "//devexpress_dll//unreg.bat";
254.     //SdShowMsg("正在注册 DevExpress_Dll,请稍候......",TRUE);   
255.     //Delay(2);
256.     if(LaunchAppAndWait(szDevExpress_Dll,"",WAIT)<0) then
257.     endif;  
258.     
259.     //LaunchApp(szDevExpress_Dll,"");   
260.     
261.     //安装完后注册 microsoft_mshtml_dll
262.     szmicrosoft_mshtml_dll = TARGETDIR ^ "//microsoft_mshtml_dll//unreg.bat";
263.     //SdShowMsg("正在注册 microsoft_mshtml_dll，请稍候......",TRUE);
264.     //Delay(2);         
265.     //NOWAIT 
266.     if(LaunchAppAndWait(szmicrosoft_mshtml_dll,"",WAIT) <0) then
267.     endif;  
268. end;
270. //定义创建卸载快捷方式
271. function CreateUninstallShortcut()   
272.  string strCmdLine;  
273.  LIST lstPath; 
274.  begin   
276.  // For an InstallScript installation:
277.  strCmdLine = DISK1TARGET ^ "Setup.exe";    
278.  // For an InstallScript MSI installation:
279.  strCmdLine = UNINSTALL_STRING;    
281.  // The path has to be handled differently if you are running   
282.  // an InstallScript MSI installation on Windows 9X.  
283.  if (SYSINFO.WIN9X.bWin9X ) then   
284.      lstPath = ListCreate( STRINGLIST );  
285.     StrGetTokens( lstPath, UNINSTALL_STRING, "/" );    
286.     
287.     ListGetFirstString( lstPath, strCmdLine );  
288.     LongPathToQuote( strCmdLine, TRUE );    
289.     
290.     strCmdLine = strCmdLine + " /M" + PRODUCT_GUID; 
291. endif;  
293.  // Create the shortcut. 
294.  AddFolderIcon(FOLDER_PROGRAMS ^ "XXXXX系统","卸载XXXXX系统V1.0",strCmdLine,"",TARGETDIR ^ "//remove.ico",0,"",REPLACE);  
295. end;   
296. //---------------------------------------------------------------------------
297. // OnFirstUIAfter
298. //
299. // First Install UI Sequence - After Move Data
300. //
301. // The OnFirstUIAfter event called by OnShowUI after the file transfer
302. // of the setup when the setup is running in first install mode. By default
303. // this event displays UI that informs the end user that the setup has been
304. // completed successfully.
305. //
306. // Note: This event will not be called automatically in a
307. // program...endprogram style setup.
308. //---------------------------------------------------------------------------
309. function OnFirstUIAfter()
310.     STRING szTitle, szMsg1, szMsg2, szOpt1, szOpt2;
311.     NUMBER bvOpt1, bvOpt2;
312.     NUMBER bShowUpdateServiceDlg;  
313. begin
315.     ShowObjWizardPages(NEXT);
316.     
317.     szTitle = "";
318.     szMsg1 = ""; 
319.     szMsg2 = "";
320.     szOpt1 = "";
321.     szOpt2 = "";
322.     bvOpt1   = FALSE;
323.     bvOpt2   = FALSE;    
325.     // Set this to true if you have the update service enabled, and if you want to check for updates.
326.     // Note: the ISUS Starter Edition does not support checking for updates programatically.  So, 
327.     // only set this to true if you have at least the ISUS Professional Edition.
328.     bShowUpdateServiceDlg = FALSE; 
329.      
330.     //调用 创建卸载快捷方式
331.     CreateUninstallShortcut(); 
332.                               
333.     //调用第三方组件 函数  
334.     CallRegsterThirdDLL(); 
335.                               
336.     //{{IS_SCRIPT_TAG(Dlg_SdDinishEx)   
337.     
338.     if ( BATCH_INSTALL ) then
339.         SdFinishReboot ( szTitle , szMsg1 , SYS_BOOTMACHINE , szMsg2 , 0 );
340.     else
341.         
342.         // If the update service is enabled, show finish dialog that includes
343.         // update check option.
344.         if( bShowUpdateServiceDlg && ( ENABLED_ISERVICES & SERVICE_ISUPDATE ) ) then
346.             if( SdFinishUpdateEx( szTitle, szMsg1, szMsg2, szOpt1, szOpt2, TRUE ) ) then
348.                 // Don't check for updates in silent mode.
349.                 if( MODE != SILENTMODE ) then
350.                     UpdateServiceCheckForUpdates( "", FALSE );
351.                 endif;
353.             endif;
355.         else
356.             SdFinish ( szTitle , szMsg1 , szMsg2 , szOpt1 , szOpt2 , bvOpt1 , bvOpt2 );
357.         endif;
359.     endif;
360.     //}}IS_SCRIPT_TAG(Dlg_SdDinishEx)   
361. end;
362. //---------------------------------------------------------------------------
363. // OnSetTARGETDIR
364. //
365. // OnSetTARGETDIR is called directly by the framework to initialize
366. // TARGETDIR to it's default value.
367. //
368. // Note: This event is called for all setups.
369. //---------------------------------------------------------------------------
370. function OnSetTARGETDIR()
371. number nId, nIgnore, nResult;
372. string szId, szTARGETDIR;
373. begin
375.     // In maintenance mode the value of TARGETDIR is read from the log file.
376.     if( MAINTENANCE ) then
377.         return ISERR_SUCCESS;
378.     endif;
380.     // Set TARGETDIR to script default.
381.     TARGETDIR = "<FOLDER_APPLICATIONS>//XXXX系统";
383.     // Read TARGETDIR from the media.
384.     nResult = MediaGetData( MEDIA, MEDIA_FIELD_TARGETDIR, nIgnore, szTARGETDIR );
386.     // Use the TARGETDIR from the media if anything was read.
387.     if( nResult >= ISERR_SUCCESS && StrLengthChars( szTARGETDIR ) ) then
388.         TARGETDIR = szTARGETDIR;
389.     endif;
390.         
391.     // Customize the default TARGETDIR for multi-instance application.
392.     // TODO: If you want something different customize the code below.  
393.     if( MAINT_OPTION = MAINT_OPTION_MULTI_INSTANCE  && MULTI_INSTANCE_COUNT > 0) then
395.         // Start with the current multi-instance count plus one.
396.         nId = MULTI_INSTANCE_COUNT + 1;
398.         // Find a unique TARGETDIR.
399.         while( ExistsDir( TARGETDIR ) = EXISTS )
400.             
401.             // Convert to string.
402.             NumToStr( szId, nId );
403.             
404.             // Update IFX_MULTI_INSTANCE_SUFFIX
405.             IFX_MULTI_INSTANCE_SUFFIX = "_" + szId;
406.         
407.             // Update TARGETDIR
408.             TARGETDIR = TARGETDIR + IFX_MULTI_INSTANCE_SUFFIX;
409.             
410.             // Update nId
411.             nId = nId + 1;
413.         endwhile;
415.     endif;
417. end;
418. //---------------------------------------------------------------------------
419. // OnMoved
420. //
421. // The OnMoved event is called as a result of the setup calling
422. // FeatureTransferData or FeatureMoveData. The event is called when
423. // all file transfer operations are completed except for batch
424. // self-registration which is performed immediately after this event returns.
425. // During uninstallation this event sent after uninstallation is completed,
426. // therefore you should not modify system state in this event.
427. //---------------------------------------------------------------------------
428. function OnMoved()
429. begin  
430. end;
431. //---------------------------------------------------------------------------
432. // OnSetUpdateMode
433. //
434. // OnSetUpdateMode is called directly by the framework to set the UPDATEMODE
435. // InstallShield system variable appropriately to control which UI events
436. // are called by OnShowUI.
437. //
438. // Note: This event is called for all setups.
439. //---------------------------------------------------------------------------
440. function OnSetUpdateMode()
441.     number  nIgnore, nMediaFlags, nInstalledVersion, nUpdateVersion, nResult;
442.     string  szVersion, szIgnore, szMsg;
443. begin
444.     
445.     UPDATEMODE = FALSE; // Non-update mode by default.
447.     // Added 11.5 - Don't set UPDATEMODE when running from Add/Remove
448.     if( ADDREMOVE ) then
449.         return ISERR_SUCCESS;
450.     endif;
452.     // Added 11.5 - Don't set UPDATEMODE when REMOVEONLY is specified
453.     if( REMOVEONLY ) then
454.         return ISERR_SUCCESS;
455.     endif;
457.     // Get the media flags.
458.     MediaGetData( MEDIA, MEDIA_FIELD_MEDIA_FLAGS, nMediaFlags, szIgnore );
460.     if( ! ( nMediaFlags & MEDIA_FLAG_UPDATEMODE_SUPPORTED ) ) then
461.         return ISERR_SUCCESS; // Update mode not supported by the setup.
462.     endif;
464.     // TODO: If you are updating an application that was installed by a previous
465.     // version of InstallShield, IFX_INSTALLED_VERSION will be empty, and
466.     // VERSION_COMPARE_RESULT_NOT_INSTALLED will be returned by
467.     // VerProductCompareVersions. Change the value of IFX_INSTALLED_VERSION (and
468.     // IFX_INSTALLED_DISPLAY_VERSION) here based on application specific version
469.     // information determined by the setup. Only do this if IFX_INSTALLED_VERSION
470.     // is empty.
471.     //if ( !StrLengthChars( IFX_INSTALLED_VERSION ) && MAINTENANCE ) then
472.     //  IFX_INSTALLED_VERSION = "X.XX.XXX";
473.     //  IFX_INSTALLED_DISPLAY_VERSION = IFX_INSTALLED_VERSION;
474.     //endif;
476.     // Verify that the installed version is valid.
477.     if( !StrLengthChars( IFX_INSTALLED_VERSION ) && MAINTENANCE ) then
478.         // If this error occurs, IFX_INSTALLED_VERSION needs to be set manually.
479.         szMsg = SdLoadString( IDS_IFX_ERROR_UPDATE_NO_INSTALLED_VERSION );
480.         MessageBox( szMsg, SEVERE );
481.         abort;
482.     endif;
484.     // Verify that the product version is valid.
485.     if( !StrLengthChars( IFX_PRODUCT_VERSION ) ) then
486.         // If this error occures, IFX_PRODUCT_VERSION was not initialized correctly.
487.         szMsg = SdLoadString( IDS_IFX_ERROR_UPDATE_NO_PRODUCT_VERSION );
488.         MessageBox( szMsg, SEVERE );
489.         abort;
490.     endif;
492.     // Do the version comparison.
493.     nResult = VerProductCompareVersions();
495.     // Make sure that valid data was returned by VerProductCompareVersions
496.     if( nResult < ISERR_SUCCESS ) then
497.         szMsg = SdLoadString( IDS_IFX_ERROR_UPDATE_VERSION_COMPARE_FAILURE );
498.         MessageBox( szMsg, SEVERE );
499.         abort;
500.     endif;
502.     // Set update mode if this is a differential media or the product is already installed and the versions do not match.
503.     UPDATEMODE = ( nMediaFlags & MEDIA_FLAG_FORMAT_DIFFERENTIAL || ( MAINTENANCE && ( nResult != VERSION_COMPARE_RESULT_SAME ) ) );
505. end;
506. //---------------------------------------------------------------------------
507. // OnCheckMediaPassword
508. //
509. // Displays a password dialog if the media is password protected.
510. //
511. // Note: This event is called for all setups.
512. //---------------------------------------------------------------------------
513. function OnCheckMediaPassword()
514. string szResult, szMsg;
515. BOOL bValidated;
516. begin
518.     // Check whether the setup author selected this option.
519.     if( !SHOW_PASSWORD_DIALOG ) then;
520.         return ISERR_SUCCESS;
521.     endif;
523.     // Check whether the password has been specified previously.
524.     LogReadCustomString( MEDIA_PASSWORD_KEY, szResult );
525.     if( FeatureValidate( MEDIA, "", szResult ) == 0 ) then
526.         return ISERR_SUCCESS;
527.     endif;
529.     // "Back" button should be disabled.
530.     Disable( BACKBUTTON );
532.     // Attempt to validate the media.
533.     bValidated = FALSE;
535.     // Loop until the password is validated.
536.     while( !bValidated )
538.         // Prompt for password.
539.         if( EnterPassword( "", "", szResult ) < ISERR_SUCCESS ) then
540.             abort; // Failed to display password dialog
541.         endif;
543.         // Attempt to validate the media.
544.         if( FeatureValidate( MEDIA, "", szResult ) == 0 ) then
545.             
546.             // Store the media password for maintenance mode.
547.             LogWriteCustomString( MEDIA_PASSWORD_KEY, szResult );
549.             bValidated = TRUE;
550.         else
551.             szMsg = SdLoadString( IDS_IFX_ERROR_INVALID_MEDIA_PASSWORD );
552.             MessageBox( szMsg, INFORMATION );
553.         endif;
555.     endwhile;
557.     // Enable "Back" button.
558.     Enable( BACKBUTTON );
560. end;
561. //---------------------------------------------------------------------------
562. // OnEnd
563. //
564. // The OnEnd event is called at the end of the setup. This event is not
565. // called if the setup is aborted.
566. //---------------------------------------------------------------------------
567. function OnEnd()  
568. begin 
569. end;  
570. //---------------------------------------------------------------------------
571. // OnUninstall
572. //
573. // The OnUninstall event is called when the setup is run with the -uninst
574. // switch, in this case this is the only event that will be called.
575. //---------------------------------------------------------------------------
576. function OnUninstall()
577. string szIgnore, szMsg;
578. number nResult;
579. BOOL bOpt1, bOpt2;
580. begin
582.     // Hide the initial progress dialog.
583.     Disable( DIALOGCACHE );
584.     
585.     // Show Uninstall Confirmation Dialog
586.     if( MessageBox( SdLoadString( IFX_MAINTUI_MSG ), MB_YESNO ) != IDYES ) then
587.         abort;
588.     endif;
589.     
590.     //调用反安装函数
591.     CallUnRegsterThirdDLL();
593.     // Remove all features.
594.     FeatureRemoveAllInMediaAndLog();
596.     // Added in 11.0, disable the cancel button during uninstall.
597.     if( REMOVEALLMODE ) then
598.         Disable( CANCELBUTTON );
599.     endif;
600.     
601.     // Added in 11.0 - Set appropriate StatusEx static text.
602.     // Moved in 12.1 - Set before calling Enable( STATUSEX ) to ensure proper product name updating.
603.     SetStatusExStaticText( SdLoadString( IDS_IFX_STATUSEX_STATICTEXT_MAINTUI_REMOVEALL ) );
605.     // Show Status
606.     SetStatusWindow( 0, "" );
607.     Enable( STATUSEX );
608.     StatusUpdate( ON, 100 );
611.     // Uninstall
612.     nResult = FeatureTransferData( MEDIA );
614.     // Handle move data error and abort if error occured.
615.     if( nResult < ISERR_SUCCESS ) then
616.         OnComponentError();
617.         abort;
618.     endif;
620.     // Disable Status
621.     Disable( STATUSEX );
623.     // Show final dialog.
624.     if ( BATCH_INSTALL ) then
625.         SdFinishReboot( SdLoadString(IFX_SDFINISH_REMOVE_TITLE), SdLoadString(IFX_SDFINISH_REMOVE_MSG2), SYS_BOOTMACHINE, "", 0 );
626.     else    
627.         SdFinish( SdLoadString(IFX_SDFINISH_REMOVE_TITLE), SdLoadString(IFX_SDFINISH_REMOVE_MSG1), "", "" , "", bOpt1 , bOpt2 );
628.     endif;
630. end;
633.