最近我发现别人的那软件在安装时有音乐播放,界面上还放了一张照片,不知道是怎么弄的,希望会弄的给我指点指点,谢谢(QQ:2227411448)

解决方案 »

  1.   

    nno Setup如何在安装时播放音乐在脚本编译里的[Code]与[Files]段处添加以下代码:
    [Code]
    Function mciSendString(lpszCommand: String; lpszReturnString: Integer; cchReturnLength: Integer; hwndCallback: Integer): Integer;
    external '[email protected] stdcall';procedure InitializeWizard();
    var
       BGMusicFile, SplashFile: string;
    SplashForm: TForm;
    SplashFileName: String;
    I: Integer; 
    beginExtractTemporaryFile(ExtractFileName(ExpandConstant('{tmp}\music.mp3')));
    SplashForm := TForm.create(nil);
    with SplashForm do
       begin
    mciSendString(ExpandConstant('play {tmp}\music.mp3'),0,0,0);
    Close;
    Free;
       end;
    end;
    [Files]
    Source: "C:\music.mp3"; Flags: dontcopy
    或者
    Source: "C:\mymusic.mp3"; DestDir: "{tmp}"; Flags: dontcopy
    代码说明:[Code]中代码{tmp}与\music.mp3的意思是播放inno setup安装时创建的临时文件夹内的music.mp3音乐文件!注:路径和音乐文件名一定要正确,不然找不到。
      

  2.   

    inno setup5.0