inno setup 在卸载前运行某个程序,怎么写脚本?(30分)

  • 主题发起人 主题发起人 winni
  • 开始时间 开始时间
W

winni

Unregistered / Unconfirmed
GUEST, unregistred user!
inno setup 在卸载前运行某个程序,怎么写脚本?
 
代码:
procedure DeinitializeUninstall();
var
  ResultCode: Integer;
begin
  // 运行记事本程序并等待它终止
  if Exec(ExpandConstant('{win}/notepad.exe'), '', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode) then
  begin
    // 如果需要处理完成,ResultCode 包含退出代码
  end
  else begin
    // 如果需要处理失败;ResultCode 包含错误代码
  end;

end;
 
[Run]
Filename: "{app}/DesktopSoftware.EXE"; Description: "运行<桌面快递>"; Flags: nowait postinstall skipifsilent
 
;-------------------------------- 桌面快递安装脚本---------------------------------------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[Setup]
AppName=桌面快递
AppVerName=桌面快递 V0.8

;这个指示的值用是在向导的选择开始菜单文件夹页中使用的默认开始菜单文件夹名。
;如果这个指示是空白或未指定,它将用“默认”作为名字
DefaultDirName={pf}/DesktopExpress
AppPublisher=首都在线

; Since no icons will be created in "{group}", we don't need the wizard
; to ask for a Start Menu folder name:
DefaultGroupName=桌面快递 V0.8

;指定“自述”文件名 (可选),用 .txt 或 .rtf (富文本) 格式,用于在安装完成后显示
;InfoAfterFile=D:/DesktopSoftware/InfoAfterFile.txt
DisableProgramGroupPage=yes
;Compression=yes
SolidCompression=yes
UninstallDisplayIcon={app}/Uninstall.exe
OutputDir=D:/Desktop安装程序
LicenseFile=D:/DesktopSoftware/InfoAfterFile.txt

[Tasks]
Name: "desktopicon"; Description: "创建桌面快捷方式"; GroupDescription: "添加快捷方式:"; Flags: checkedonce
Name: "quicklaunchicon"; Description: "添加到快速启动栏"; GroupDescription: "添加快捷方式:"; Flags: checkedonce
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Files]
;这是定义安装程序安装文件到用户系统中的可选文件段
;软件本身包含的文件外,还必须包含相关的链接库
;以下即软件本身的文件,注:安装目录下有一个 "/Data" 的子目录

;Bin Dir
Source: "D:/DesktopSoftware/Client/bin/DesktopSoftware.EXE"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:/DesktopSoftware/Client/bin/Desktop.ini"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:/DesktopSoftware/Client/bin/UnDownload.xml"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:/DesktopSoftware/Client/bin/duping.scr"; DestDir: "{app}"; Flags: ignoreversion

;Download Dir
Source: "D:/DesktopSoftware/Client/bin/Download/DesktopPic/*"; DestDir: "{app}/Download/DesktopPic"; Flags: ignoreversion
Source: "D:/DesktopSoftware/Client/bin/Download/Desktop_New.xml"; DestDir: "{app}/Download"; Flags: ignoreversion
Source: "D:/DesktopSoftware/Client/bin/Download/Desktop_Old.xml"; DestDir: "{app}/Download"; Flags: ignoreversion
Source: "D:/DesktopSoftware/MyIcon.ico"; DestDir: "{app}"; Flags: ignoreversion

;Client Dir
;Source: "D:/DesktopSoftware/使用须知"; DestDir: "{app}"; Flags: isreadme

;Skin
;Source: "D:/DesktopSoftware/Client/Skin/*"; DestDir: "{app}/Client/Skin"; Flags: ignoreversion

; 注意: 不要在任何共享系统文件中使用“Flags: ignoreversion”
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Dirs]
Name: "{app}/Download/DesktopPic"


[Icons]
;这个可选段定义所有创建在开始菜单和/或其它位置 (比如桌面) 的快捷方式
;桌面快捷方式
;Name: "{commondesktop}/桌面快递"; Filename: "{app}/DesktopSoftware.EXE";IconFilename: "{app}/myicon.ico"
;添加到快速启动栏
;Name: "{quicklaunch}/桌面快递"; Filename: "{app}/Client/Bin/DesktopSoftware.EXE";IconFilename: "{app}/Bin/myicon.ico"
Name: "{group}/卸载桌面快递"; Filename: "{uninstallexe}"
Name: "{userappdata}/Microsoft/Internet Explorer/Quick Launch/桌面快递"; Filename: "{app}/DesktopSoftware.EXE"; WorkingDir: "{app}/bin"; Tasks: "quicklaunchicon";

Name: "{group}/桌面快递"; Filename: "{app}/DesktopSoftware.EXE"
Name: "{userdesktop}/桌面快递"; Filename: "{app}/DesktopSoftware.EXE"; Tasks: desktopicon


[Run]
Filename: "{app}/DesktopSoftware.EXE"; Description: "运行<桌面快递>"; Flags: nowait postinstall skipifsilent

[UninstallDelete]
Type: filesandordirs; Name: "{app}/*"
 
我要分!!!!!!!!!
 
后退
顶部