InstallShield常用实例

1.怎样在进度条左上角显示当前安装的文件
     在function SetupScreen()中加入以下语句
     Enable( INDVFILESTATUS ); 
     
 2.怎样改变窗口背景色
     SetColor( BACKGROUND, **** )函数可以改变窗口背景色，在适当的位置加上它即可，其中第二个变量可以为以下值：
     BK_BLUE BK_MAGENTA BK_PINK BK_YELLOW
     BK_GREEN BK_ORANGE BK_RED
     以上几种为渐变色
     BK_SOLIDBLACK BK_SOLIDMAGENTA BK_SOLIDRED
     BK_SOLIDBLUE BK_SOLIDORANGE BK_SOLIDWHITE
     BK_SOLIDGREEN BK_SOLIDPINK BK_SOLIDYELLOW
     同时第二个参数也可以用RGB来描述，如SetColor( BACKGROUND, RGB(0,0,255) ) 
      
3.怎样在安装结束时允许用户选择是否打开Readme文件
     假定Readme.txt文件已经复制到目标路径，以下程序将显示一个复选框，如果用户选择了，则用记事本打 开Readme.txt。

     function DialogShowSdFinishReboot() NUMBER nResult, nDefOptions; STRING szTitle, szMsg1, szMsg2, szOption1, szOption2,szPathls; NUMBER bOpt1, bOpt2; begin if (!BATCH_INSTALL) then bOpt1 = TRUE; bOpt2 = FALSE; szMsg1 = ""; szMsg2 = ""; szOption1 = "阅读Readme文件"; szOption2 = ""; nResult = SdFinish( szTitle, szMsg1, szMsg2, szOption1, szOption2, bOpt1, bOpt2 ); if bOpt1 = TRUE then CopyFile ( "Readme.txt" , "Readme.txt" ); LaunchApp ( WINDIR^"Notepad.exe" , TARGETDIR^"Readme.txt" ); endif; return 0; endif; .......... end      
4.如何指定默认路径
     在function SetupInstall()中修改以下代码，如默认目录改为C:/JttMis，见以下修改的代码 
     if (bIs32BitSetup) then svDir = WINDISK ^ "Jttmis"; else svDir = WINDISK ^ "Jttmis"; // use short names endif; TARGETDIR = svDir;

5.自定义组件目录(MSI)

  ComponentSetTarget(MEDIA, "<MYDIR>", szTargetPath);

  在组件中就可以使用 <MYDIR>作为目录存放文件了。