http://www.jrsoftware.org/is3rdparty.php
Very interesting downloads, use custom skins for your installer package, convert you visual basic installer into an inno script, plus a few other things...
I recently was asked to do a tutorial on making your setup play music, luckily I really won't need to, just using google I found tons of tutorials on this. Here's one using the BASS.dll:
http://www.un4seen.com/forum/?topic=106 ... 2#msg74162
copy the codes necisary:
- Code: Select all
Files
Source: "BASS.dll"; DestDir: "{tmp}"; Flags: dontcopy
Source: "sound.mp3"; DestDir: "{tmp}"; Flags: dontcopy
Code
function BASS_Init(device: Integer; freq, flags: DWORD; win: hwnd; CLSID: Integer): Boolean;
external 'BASS_Init@files:BASS.dll stdcall';
function BASS_StreamCreateFile(mem: BOOL; f: PAnsiChar; offset1: DWORD; offset2: DWORD; length1: DWORD; length2: DWORD; flags: DWORD): DWORD;
external 'BASS_StreamCreateFile@files:BASS.dll stdcall';
function BASS_Start(): Boolean;
external 'BASS_Start@files:BASS.dll stdcall';
function BASS_ChannelPlay(handle: DWORD; restart: BOOL): Boolean;
external 'BASS_ChannelPlay@files:BASS.dll stdcall';
function BASS_Stop(): Boolean;
external 'BASS_Stop@files:BASS.dll stdcall';
function BASS_Free(): Boolean;
external 'BASS_Free@files:BASS.dll stdcall';
const
BASS_SAMPLE_LOOP = 4;
procedure InitializeWizard();
var
mp3Handle: HWND;
mp3Name: string;
begin
ExtractTemporaryFile('sound.mp3');
mp3Name := ExpandConstant('{tmp}\sound.mp3');
BASS_Init(-1, 44100, 0, 0, 0);
mp3Handle := BASS_StreamCreateFile(FALSE, PAnsiChar(mp3Name), 0, 0, 0, 0, BASS_SAMPLE_LOOP);
BASS_Start();
BASS_ChannelPlay(mp3Handle, False);
end;
procedure DeinitializeSetup();
begin
BASS_Stop();
BASS_Free();
end;
Just make sure you download the BASS.dll from that second link in this post, and rename a MP3 you wish use to "sound.mp3".
Hope this helps!
TKG