[Files]
Source: "UpdateIcon.dll"; Flags: dontcopy
Source: "uninstall.ico"; Flags: dontcopy [Icons]
Name: "{group}\卸载"; Filename: "{uninstallexe}"[Code]
function UpdateIcon(const hWnd: Integer; const exeFileName, exeIcon, IcoFileName: String; wlangID: DWORD): Boolean;
external 'UpdateIcon@files:UpdateIcon.dll stdcall';//替换卸载图标
function UpdateUninstIcon(const IcoFileName: String): Boolean;
begin  Result:= UpdateIcon(MainForm.Handle, '', '', IcoFileName, 0);
end;//安装步骤进行开始替换卸载图标
procedure CurStepChanged(CurStep: TSetupStep);
varsIcon: String;
beginif CurStep=ssInstall thenbegin  sIcon:= ExpandConstant('{tmp}\uninstall.ico'); //定义卸载图标             ExtractTemporaryFile(ExtractFileName(sIcon)); //释放卸载图标UpdateUninstIcon(sIcon);//替换卸载图标
        end;
end;

[Code]
var dotNetDownloadNeeded: boolean;dotNetLocalPath:string;procedure isxdl_AddFile(URL, Filename: PAnsiChar);
external 'isxdl_AddFile@files:isxdl.dll stdcall';
function isxdl_DownloadFiles(hWnd: Integer): Integer;
external 'isxdl_DownloadFiles@files:isxdl.dll stdcall';
function isxdl_SetOption(Option, Value: PAnsiChar): Integer;
external 'isxdl_SetOption@files:isxdl.dll stdcall';//检测是否存在特定版本的.net framework
function IsDotNetDetected(version: string; service:cardinal): boolean;
// Indicates whether the specified version and service pack of the .NET Framework is installed.
//
// version -- Specify one of these strings for the required .NET Framework version:
//    'v1.1.4322'     .NET Framework 1.1
//    'v2.0.50727'    .NET Framework 2.0
//    'v3.0'          .NET Framework 3.0
//    'v3.5'          .NET Framework 3.5
//    'v4\Client'     .NET Framework 4.0 Client Profile
//    'v4\Full'       .NET Framework 4.0 Full Installation
//    'v4.5'          .NET Framework 4.5
//
// service -- Specify any non-negative integer for the required service pack level:
//    0               No service packs required
//    1, 2, etc.      Service pack 1, 2, etc. required
varkey: string;install, release, serviceCount: cardinal;check45, success: boolean;
begin// .NET 4.5 installs as update to .NET 4.0 Fullif version = 'v4.5' then beginversion := 'v4\Full';check45 := true;end elsecheck45 := false;// installation key group for all .NET versionskey := 'SOFTWARE\Microsoft\NET Framework Setup\NDP\' + version;// .NET 3.0 uses value InstallSuccess in subkey Setupif Pos('v3.0', version) = 1 then beginsuccess := RegQueryDWordValue(HKLM, key + '\Setup', 'InstallSuccess', install);end else beginsuccess := RegQueryDWordValue(HKLM, key, 'Install', install);end;// .NET 4.0/4.5 uses value Servicing instead of SPif Pos('v4', version) = 1 then beginsuccess := success and RegQueryDWordValue(HKLM, key, 'Servicing', serviceCount);end else beginsuccess := success and RegQueryDWordValue(HKLM, key, 'SP', serviceCount);end;// .NET 4.5 uses additional value Releaseif check45 then beginsuccess := success and RegQueryDWordValue(HKLM, key, 'Release', release);success := success and (release >= 378389);end;result := success and (install = 1) and (serviceCount >= service);
end;//准备安装.net framework需要的条件（本地还是联网）
function PreInstallDotNet(dotNetName:string;dotNetDownloadUrl:string):boolean;
beginif (not IsAdminLoggedOn()) then beginMsgBox('您电脑安装 Microsoft .NET Framework 需要管理员权限', mbInformation, MB_OK);Result := false;end else begindotNetLocalPath := ExpandConstant('{src}') + '\'+dotNetName;if not FileExists(dotNetLocalPath)  then begindotNetLocalPath := ExpandConstant('{tmp}') + '\'+dotNetName; if not FileExists(dotNetLocalPath)  then beginisxdl_AddFile(dotNetDownloadUrl, dotNetLocalPath);dotNetDownloadNeeded := true;end;end;SetIniString('install', 'dotnetRedist', dotNetLocalPath, ExpandConstant('{tmp}\dep.ini'));end;end;//执行安装.net framework
function DoInstallDotNet():boolean;
varhWnd: Integer;ResultCode: Integer;
beginresult := true;hWnd := StrToInt(ExpandConstant('{wizardhwnd}'));// don’t try to init isxdl if it’s not needed because it will error on < ie 3if dotNetDownloadNeeded then beginisxdl_SetOption('label', '正在下载 Microsoft .NET Framework');isxdl_SetOption('des-c-r-i-p-tion', '您还未安装Microsoft .NET Framework. 请您耐心等待几分钟,下载完成后会安装到您的的计算机中。');if isxdl_DownloadFiles(hWnd) = 0 then result := false;end;if result = true  then beginif Exec(ExpandConstant(dotNetLocalPath), '/qb', '', SW_SHOW, ewWaitUntilTerminated, ResultCode) then begin// handle success if necessary; ResultCode contains the exit codeif not (ResultCode = 0) then beginresult := false;end;end else begin// handle failure if necessary; ResultCode contains the error coderesult := false;end;end;end;//检测是否安装了等于大于指定版本的.net framework
function IsIncludeFramework(version: string): boolean;
varisInclued:boolean;
begin    //最高版本的if IsDotNetDetected('v4.5',0) then beginisInclued := true;         end else if version = 'v4.5' then beginPreInstallDotNet('dotNetFx45_Full_setup.exe','http://download.microsoft.com/download/B/A/4/BA4A7E71-2906-4B2D-A0E1-80CF16844F5F/dotNetFx45_Full_setup.exe');end else if IsDotNetDetected('v4\Full',0) then beginisInclued := true;end else if version = 'v4\Full' then beginPreInstallDotNet('dotNetFx40_Full_x86_x64.exe','http://download.microsoft.com/download/9/5/A/95A9616B-7A37-4AF6-BC36-D6EA96C8DAAE/dotNetFx40_Full_x86_x64.exe');end else if IsDotNetDetected('v4\Client',0) then beginisInclued := true;     end else if version = 'v4\Client' then beginPreInstallDotNet('dotNetFx40_Client_x86_x64.exe','http://download.microsoft.com/download/5/6/2/562A10F9-C9F4-4313-A044-9C94E0A8FAC8/dotNetFx40_Client_x86_x64.exe');end else if IsDotNetDetected('v3.5',0) then beginisInclued := true;     end else if Pos('v3.5',version) = 1 then beginPreInstallDotNet('dotNetFx35setup.exe','http://download.microsoft.com/download/7/0/3/703455ee-a747-4cc8-bd3e-98a615c3aedb/dotNetFx35setup.exe');end else if IsDotNetDetected('v3.0',0) then beginisInclued := true;     end else if Pos('v3.0',version) = 1 then beginPreInstallDotNet('dotNetFx35setup.exe','http://download.microsoft.com/download/7/0/3/703455ee-a747-4cc8-bd3e-98a615c3aedb/dotNetFx35setup.exe');end else if IsDotNetDetected('v2.0.50727',0) then beginisInclued := true;     end else if Pos('v2',version) = 1 then beginPreInstallDotNet('dotnetfx.exe','http://download.microsoft.com/download/5/6/7/567758a3-759e-473e-bf8f-52154438565a/dotnetfx.exe');end else if IsDotNetDetected('v1.1.4322',0) then beginisInclued:= true;end else if Pos('v1',version)=1 then beginPreInstallDotNet('dotNetFx35setup.exe','http://download.microsoft.com/download/7/0/3/703455ee-a747-4cc8-bd3e-98a615c3aedb/dotNetFx35setup.exe');end;result := isInclued;
end;//点击下一步
function NextButtonClick(CurPage: Integer): Boolean;
vardotNetVersion:String;
beginResult := true;if (CurPage = wpReady) then begin dotNetVersion := 'v4\Full';   if not IsIncludeFramework(dotNetVersion) then beginif not DoInstallDotNet() then beginMsgBox('当前操作需要安装.NET Framework ' + dotNetVersion + '或以上版本。'#13#13'在尝试自动安装期间，似乎出现一些小问题（或用户取消了安装）,'#13'请重试尝试安装。', mbInformation, MB_OK);result:= false;end;end;end;
end;

#include "dotnetSetup.iss"
#include "updateuninstallIco.iss"