InnoSetup 实现 安装目录 复制 带卸载功能。

软件是绿色版，需要手动创建桌面快捷方式，经销商希望能傻瓜安装板，能自动创建桌面快捷方式

; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

#define MyAppName "V8httpsAAA"
#define MyAppVersion "10.1"
#define MyAppPublisher ""
#define MyAppExeName "Sale.exe"

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{9FB4D876-3EA7-4833-8C8A-DEB3EC7C6F29}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
;DefaultDirName={pf}\{#MyAppName}
DefaultDirName=D:\WfyV8Https
DisableProgramGroupPage=yes
OutputDir=D:\mywork\V8\WfyV8Https
OutputBaseFilename=WfyV8Https
SetupIconFile=D:\V8正式版_20230104182055\V8正式版\Images\as7ah-4vkr3-001.ico
Compression=lzma
SolidCompression=yes
Uninstallable=yes
UninstallDisplayName=卸载{#MyAppName}s
SetupLogging=yes

[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"

;unchecked 未选中 checkablealone 选中
[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: checkablealone


[Files]

;Source: "D:\V8正式版_20230104182055\V8正式版\AdminV8Tools.exe"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\AmMpsPostSdk.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\AmMpsSdk.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\2.1.6.52\database\pos.db"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\cache\data_2.1.8.169.db"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\Cef\x64\cef.pak"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\Cef\x64\CefSharp.BrowserSubprocess.Core.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\Cef\x64\CefSharp.BrowserSubprocess.exe"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\Cef\x64\CefSharp.Core.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "D:\V8正式版_20230104182055\V8正式版\zh-Hans\DevExpress.XtraWizard.v13.2.resources.dll"; DestDir: "{app}"; Flags: ignoreversion

Source: "D:\V8正式版_20230104182055\V8正式版\*"; DestDir: "{app}"; Flags: recursesubdirs createallsubdirs ignoreversion
;上面这句解决很多行的文件复制，子目录创建问题

;Source: "F:\develope\YRBYK\YRBYK\bin\Debug\api-ms-win-crt-locale-l1-1-0.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "F:\develope\YRBYK\YRBYK\bin\Debug\api-ms-win-crt-math-l1-1-0.dll"; DestDir: "{app}"; Flags: ignoreversion
;Source: "F:\develope\YRBYK\YRBYK\bin\Debug\api-ms-win-crt-private-l1-1-0.dll"; DestDir: 
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{commonprograms}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon
Name: "{group}\卸载 {#MyAppName}"; Filename: "{uninstallexe}"

[Run]
Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent

[Code]
function InitializeUninstall(): Boolean;
begin
if MsgBox('您确定要卸载吗？', mbConfirmation, MB_YESNO) = IDYES then
result:=true
else
result:=false;
end;