ThinkDelphi官方博客ThinkDelphi名博

“照亮Delphi的美! 翻开Delphi新一页!”
个人信息
  • 今日访问:19
  • 总访问量:10046
  • 开博时间:2018-03-01
博文

安装脚本

安装脚本

2019-02-18

procedure InstallFramework; var StatusText: string; ResultCode: Integer; begin StatusText := WizardForm.StatusLabel.Caption; WizardForm.StatusLabel.Caption := ‘Installing .NET Framework 4.5.2. This might take a few minutes…’; WizardForm.ProgressGauge.Style := npbstMarquee; try if not Exec(ExpandConstant(‘{tmp}\NetFrameworkInstaller.exe’), ‘/passive /norestart’, ”, SW_SHOW, ewWaitUntilTerminated, ResultCode) then begin MsgBox(‘.NET in

分类: innoSetup技术 | 评论:0 | 浏览:14 查看全文>>

项目inno setup安装脚本,带检测.net framework

项目inno setup安装脚本,带检测.net framework

2019-02-18

; Script generated by the Inno Setup Script Wizard. ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES! #define MyAppName "appname" #define MyAppNameEn "appname english" #define MyAppVersion "2.0.0.0" #define MyAppPublisher "publisher name, Inc." #define MyAppExeName "eTMS.exe" #define MyAppLoggingName "系统登陆" #define MyAppLoggedName "windows logged name" #define RegGridPPBatName "注册控件.bat" #define RegGridPPName "注册控件" #define DebugSourceP

分类: innoSetup技术 | 评论:0 | 浏览:17 查看全文>>

inno setup 安装.net framework脚本

inno setup 安装.net framework脚本

2019-02-18

function InitializeSetup: Boolean; var Path,tmppath:string ; ResultCode: Integer; dotNetV2RegPath:string; dotNetV2DownUrl:string; dotNetV2PackFile:string; begin dotNetV2RegPath:='SOFTWARE\Microsoft\.NETFramework\Policy\v4.0'; dotNetV2DownUrl:='http://dl1sw.baidu.com/soft/9b/15910/Microsoft.NET.exe?version=585709662'; dotNetV2PackFile:='{src}\dotNetFx40_Full_x86_x64.exe'; //先在注册表查找.net4.0是否存在 if RegKeyExists(HK

分类: innoSetup技术 | 评论:0 | 浏览:16 查看全文>>
共1页/3条记录 

关于凯蒂 | 联系我们 | 博客后台管理入口

©2018 ThinkDelphi --- 东莞大师兄作品