最近我發現別人的那軟體在安裝時有音樂播放，界面上還放了一張照片，不知道是怎么弄的，希望會弄的給我指點指點，謝謝（QQ：2227411448）
uj5u.com熱心網友回復：
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;
begin
ExtractTemporaryFile(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音樂檔案！
注：路徑和音樂檔案名一定要正確，不然找不到。
uj5u.com熱心網友回復：
inno setup5.0轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/154504.html
標籤：語言基礎/算法/系統設計
上一篇：delphi 5 use crystal report 8.5 function send email
下一篇：大家幫忙