InstallShield操作整理

<2010_1029_1906>InstallShield2009快捷方式图标的确定

<2010_1103_1700>

检测文件和安装环境

 

/**DIR_WRITEABLE—szIsData specifies the fully qualified path to be checked.DOTNETFRAMEWORKINSTALLED—szIsData specifies the version of the .NET Framework or language pack to check. For more information on the predefined values that are supported, see the Additional Information section.DOTNETSERVICEPACKINSTALLED—szIsData specifies the minimum service pack and version of the .NET Framework to check, in the following format:Service Pack Number|.NET Version Registry Constant or Path Service Pack Number indicates the number of the minimum service pack. For the .NET Framework 1.0, the value can be 0 through 3. For the .NET Framework 1.1 and later, all numeric values are supported. Both the service pack number and the pipe character (|) delimiter must be included; otherwise, the function returns failure. .NET Version Registry Constant or Path indicates the registry constant or registry path that shows the version of the .NET Framework to check. For more information on the predefined values that are supported and to learn how the Is function performs the check, see the Additional Information section. FILE_EXISTS—szIsData specifies the fully qualified file name. You can specify a valid URL in this parameter. To check the validity of a URL, call Is(VALID_PATH, szIsData).FILE_LOCKED—szIsData specifies the fully qualified file name.FILE_WRITEABLE—szIsData specifies the fully qualified file name.FONT_AVAILABLE—szIsData specifies the font title.FUNCTION_EXPORTED—szIsData specifies the fully qualified file name of the DLL followed by a pipe character (|) and the name of the function; for example:C://MyDLLFolder//MyDLL.dll|MyFunction LANG_SUPPORTED—szIsData specifies the path to the Setup.ini file and the language ID, in the following format:Path to Setup.ini|Language ID If the path to Setup.ini is not specified, the current installation is used. If the language ID is not specified, SELECTED_LANGUAGE is used. */export prototype MyCheckFile(STRING);function MyCheckFile(szFileName) STRING szResult; BOOL bInstall;BOOL bQuit;begin/** 检查软件是否安装 */ if(FindFile (WINSYSDIR, szFileName, szResult) < 0) thenAskOptions (EXCLUSIVE, "本机没安装xx软件，请先安装xx软件包", "安装xx软件", bInstall, "取消安装", bQuit);if(bQuit) thenabort;endif; //call next function to install xxSoft//... endif; /** 检查文件是否使用, 是否在运行 */ if (Is(FILE_LOCKED, "xx.exe") = TRUE) then SprintfBox (INFORMATION, "警告！", "系统检测到xx软件正在运行中，请退出退出！", "提示信息"); abort; endif; /** 检查文件其他属性 */#define EXAMPLE_FILE WINDIR^"xx.exe" if (Is(FILE_WRITEABLE, EXAMPLE_FILE) = FALSE) then SprintfBox (INFORMATION, "警告！", "文件不可写!", "提示信息"); abort; endif; /** @note * 关于检测的资料查看Installsheield 帮助, 关键字: is */end;

/*** 检测xx系统是否存在, 必须卸载xx系统才能继续安装*/function OnBegin()NUMBER nRc;STRING strxxSoft;begin // TODO: Perform custom initialization steps, //check requirements, etc. //挑该系统的主程序的存在作为该系统已经安装的标志 strxxSoft = "C://tmp//test.exe"; nRc = TRUE; while(TRUE = nRc) nRc = Is(FILE_EXISTS, strxxSoft); if(TRUE = nRc) then if (AskYesNo("在安装xx+1版之前, 请先卸载xx版./n是否退出安装程序", YES) = YES) thenabort; endif; endif; endwhile; end;

卸载程序

 

/*** @name CreateShortcurt_Uninstall()* @brief 创建卸载快捷方式* @return NULL*/export prototype CreateShortcurt_Uninstall();function CreateShortcurt_Uninstall()STRING strCmdLine;STRING strProductFolder;STRING strIconPath;STRING strItemName;beginstrCmdLine = UNINSTALL_STRING ^ " -removeonly"; strProductFolder = "xxSoft//xxProgram"; strIconPath = TARGETDIR ^ "Uninst.ico"; strItemName = "卸载"; AddFolderIcon(FOLDER_PROGRAMS^strProductFolder, strItemName, strCmdLine, "", strIconPath, 0, "", NULL );end;

function OnEnd()NUMBER nRc;STRING strDirSoftInst;begin /*** 删除残留的安装目录*/ strDirSoftInst = "C://Program Files//MyTest//Vx//"; nRc = Is(PATH_EXISTS, strDirSoftInst);if(TRUE = nRc) thenDeleteDir(strDirSoftInst, ALLCONTENTS);endif;end;

 

<2010_1105_1041>

      /**
      * 安装外部程序时的阻塞操作
      */
      SdShowMsg("正在安装 xx组件...",TRUE);
      //如果是安装由用户操作的程序, 必须等待用户操作结束, 因为不知道用户是否继续安装或用户等待
      //或者那个程序中有MessageBox之类的提示，需要用户干预的阻塞操作
        if (LaunchAppAndWait (G_CS_PROG_1, "", LAAW_OPTION_WAIT) < 0) then

        //需要隐藏安装程序并阻塞, 调用LaunchApplication

        //if(LaunchApplication(G_CS_PROG_1, "","",SW_HIDE,INFINITE,LAAW_OPTION_WAIT ) < 0)then
            szMsg = "安装xx组件失败，请手工安装！";
      MessageBox(szMsg, SEVERE);
      abort;
        endif;
      SdShowMsg("正在安装 xx组件...",FALSE);

 

<2010_1221>

文件操作

/** @note* 直接创建多级文件夹, * 这个API比Win32的好用, 自己把逐级创建接管了*/CreateDir("C://tmp//xxSoftApplicationData");