立即注册 登录
总裁社区 返回首页

飞鹰科技 https://www.sysceo.com/forum/?51833 [收藏] [复制] [分享] [RSS]

日志

Inno Setup 静默脚本

已有 90 次阅读2019-8-20 17:10

[Code]

//关键代码静默安装

procedure InitializeWizard();

begin

//不显示边框,这样就能达到不会闪两下了

WizardForm.BorderStyle:=bsNone;

end; 

procedure CurPageChanged(CurPageID: Integer);
begin

//因为安装过程界面隐藏不了,所以设置窗口宽高为0

WizardForm.ClientWidth := ScaleX(0)

WizardForm.ClientHeight := ScaleY(0)

if CurPageID = wpWelcome then

WizardForm.NextButton.OnClick(WizardForm);

if CurPageID >= wpInstalling then

WizardForm.Visible := False

else

WizardForm.Visible := True;

// WizardForm.NextButton.OnClick(WizardForm);

end;

function ShouldSkipPage(PageID: Integer): Boolean;

begin

result := true;

end;

[Run]

Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: shellexec 

postinstall skipifsilent



路过

鸡蛋

鲜花

握手

雷人

评论 (0 个评论)

facelist doodle 涂鸦板

您需要登录后才可以评论 登录 | 立即注册