inno静默+开始菜单

; 脚本由 Inno Setup 脚本向导 生成！
; 有关创建 Inno Setup 脚本文件的详细资料请查阅帮助文档！

#define MyAppName "NGO_Onekey"
#define MyAppVersion "1.0"
#define MyAppPublisher "neusoft"
#define MyAppURL "http://www.neusoft.com/"
#define MyAppExeName "wgetX86.exe"

[Setup]
; 注: AppId的值为单独标识该应用程序。
; 不要为其他安装程序使用相同的AppId值。
; (生成新的GUID，点击 工具|在IDE中生成GUID。)
AppId={{9FDCB748-E3F7-4EF1-9497-FF277D262C1E}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName=C:\{#MyAppName}
DisableDirPage=yes
DefaultGroupName=无纸化一键安装
DisableProgramGroupPage=yes
OutputDir=C:\Documents and Settings\Administrator\桌面
OutputBaseFilename=NGO_Onekey
Compression=lzma
SolidCompression=yes

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

[code]
procedure InitializeWizard();
begin
WizardForm.BorderStyle:=bsNone;
end;
function ShouldSkipPage(PageID: Integer): Boolean;
begin
    Result := True
end;
procedure CurPageChanged(CurPageID: Integer);
var
indexpageid3:Integer;
begin
    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;    
end;



[Files]
Source: "C:\Documents and Settings\Administrator\桌面\NGO_Onekey\wgetX86.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\Documents and Settings\Administrator\桌面\NGO_Onekey\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; 注意: 不要在任何共享系统文件上使用“Flags: ignoreversion”

[Icons]
Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"

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