Hi!
i have created a aqua.rc file with this content:
AquaSound RCDATA AQUA.xmAnd i want to Play this File on FormCreate!
here is my Delphi Source:
procedure TForm1.FormCreate(Sender: TObject);
begin
(* setup output - default device, 44100hz, stereo, 16 bits *)
if not BASSMOD_Init(-1,44100,0) then begin
Error('Can''t initialize device');
BASSMOD_Free
end
else if BASSMOD_MusicLoad(FALSE, PChar('H:\mods\Aqua.xm'), 0, 0, BASS_MUSIC_LOOP or BASS_MUSIC_RAMPS or BASS_MUSIC_SURROUND or BASS_MUSIC_POSRESET) <> 0 then begin
BASSMOD_MusicPlay;
end
end;
end.
And i want to use the Resource File instead of
H:\mods\Aqua.xm.
Can someone please help me ?
