InstallShield 自己总结常用操作

转自 http://www.cnblogs.com/wenlin1234/archive/2007/06/28/798748.html

 

//安装完成后执行某些操作并将其删除
function OnFirstUIAfter()
begin   
  TARGETDIR = PROGRAMFILES ^@COMPANY_NAME ^@PRODUCT_NAME; 
  LaunchAppAndWait(TARGETDIR^"FtpConfig.bat","" ,WAIT);
  DeleteFile("FtpConfig.bat");
end;
//验证序列号
在function OnFirstUIBefore()中的
Dlg_SdRegisterUserEx:里nResult下面添加:
 if  szSerial!=("e43f2811-6643-4742-8c0a-08a9db9df188") && (nResult = NEXT) then 
     MessageBox( "您录入的注册码不正确！", WARNING );
     goto start;
     endif;
//卸载程序
function OnMoved()
STRING szWorkingDir,szIconPath,szItemName,svTmp,szParam;
STRING szProgram,szCommandLine,szShortCutKey,szProgramFolder;
NUMBER nResult,nFlag,nIcon;
begin
 if !MAINTENANCE then
 szProgramFolder =FOLDER_PROGRAMS+@PRODUCT_NAME;
 szWorkingDir    = TARGETDIR;
 szIconPath      = PROGRAMFILES^@COMPANY_NAME ^@PRODUCT_NAME+'//uninstall.ICO';
 nIcon           =0;
 szItemName      = "卸载little-oa";
 //szProgram       = szIconPath;
 svTmp  = PROGRAMFILES+"InstallShield Installation Information//"+PRODUCT_GUID+"//setup.exe";
 LongPathToQuote(svTmp, TRUE);
 szParam         = svTmp;
 LongPathToShortPath(szParam);
 svTmp  = COMMONFILES+"InstallShield//engine//6//Intel 32//ctor.dll";
 LongPathToShortPath(svTmp);
 szProgram       = "RunDll32"+" "+ svTmp+",LaunchSetup";
 szCommandLine = szProgram + " " + szParam;
 //RunDll32 D:/PROGRA~1/COMMON~1/INSTAL~1/ENGINE/6/INTEL3~1/ctor.dll,LaunchSetup "D:/Program Files/InstallShield Installation Information/PRODUCT_GUID+"//setup.exe"
//szProgramFolder中的@PRODUCT_NAME要与开始->程序->()->shortcut中的()的名称要一样,这样卸载才能加到开始->程序->()中去.
 if (AddFolderIcon(szProgramFolder, szItemName, szCommandLine, szWorkingDir,
                   szIconPath, nIcon, szShortCutKey, nFlag) < 0) then
    return -1;
 endif;
 AddFolderIcon(szProgramFolder, szItemName, szCommandLine, szWorkingDir,
                   szIconPath, nIcon, szShortCutKey, nFlag);
 nResult = CreateShellObjects( "" );
 
 if nResult <0 then
  return nResult;
 else             
  ShowProgramFolder (szProgramFolder,SW_SHOW);
  return nResult;
 endif;

endif;
end;