biblioteka BASS i problem

Mam problem.Zainstalowałem biblioteke BASS.Teraz kiedy dodam do wave.res(zadeklarowanego w programie):
typ: wave,
nazwa: ID_WAVE
zawartość[tu wklejam muzyczka.xm].Co mam robić aby ta muzyczka xm z zasobów została poprawnie odtworzona i zakolejkowana(loop)??Jaki kod mam wpisać ? ;-( ;-|

O boizu, to BASS się instaluje? Poza tym nie kumam o co Ci chodzi, a jeśli kumam to problem jest mało skomplikowany. Musisz zdobyć wskaźnik na ten zasób i podać go przy otwieraniu XMa przez BASSa. Zamiast nazwy pliku podajesz adres w pamięci.

hahaha ! bardzo smieszne :( jestem początkujący =_=

hahaha ! bardzo smieszne :( jestem początkujący =_=

W takim razie, proponuję obejrzeć przykłady do bassa, helpa i trochę pokombinować. A jak po wielu próbach nic nie będzie wychodziło, to wtedy możesz zastanowić się, jak dobrze sformułować pytanie, po czym napisać je tutaj.

W takim razie, proponuję obejrzeć przykłady do bassa, helpa i trochę pokombinować. A jak po wielu próbach nic nie będzie wychodziło, to wtedy możesz zastanowić się, jak dobrze sformułować pytanie, po czym napisać je tutaj.

wygrales.

<font color="blue">Jaki kod mam wstawić aby została odtworzona muzyczka XM z zasobów ?</span>

Nie potraficie programować ?Tylko Odpowiedź jest prosta... itd. Nawet nie podacie przykładu,kodu ani nic ! :|

nikomu sie nie chce powtarzac.
wystarczy przeszukac forum i faq.
nie mowiac o tym ze sheitar dal ci odp.

bassplayer1.open('nazwa z zasobow.');

:( w OnCreate:

 Bass.Open('ID_XM');

I zadeklarowałem wave.res,w uses dodałem Bass.Tylko że Bassplayer-undeclared identifier.Open-undeclared identifier.I co teraz ??? Ja juz nic niewiem :(

Ehhhh... zlitowałem się nad tobą. Będzie krok po kroku.

Najpierw tworzysz zasobik z plikiem xm/mod/s3m czy co tam takiego. Ja zrobiłem sobie w pliku mod.rc:

[code]Muzyczka RCDATA "muza.s3m"[/code]

następnie brcc32, ale to wiadomo. Powstaje mi z tego mod.RES. Teraz siup do Delphi. Do uses trzeba dopisać BASS. Potem pod implementation dopisać:

{$R mod.RES}

Obsłużyć odpowiednie zdarzenia, zapewniając inicjalizację i finalizację biblioteki BASS.

procedure TForm1.FormCreate(Sender: TObject);
begin
 BASS_Init(1,44100,0,Handle,nil);
 BASS_Start;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
 BASS_Stop;
 BASS_Free;
end;

Na koniec to co najtrudniejsze. Uwaga będzie mocno. Pod zdarzenie OnClick przycisku należy wpisać:

procedure TForm1.Button1Click(Sender: TObject);
var
 Res: TResourceStream;
begin
 Res := TResourceStream.Create(hInstance,'Muzyczka',RT_RCDATA);
 BASS_MusicPlay(BASS_MusicLoad(True,Res.Memory,0,0,BASS_MUSIC_AUTOFREE,0));
 Res.Free;
end;

Następnie wcisnąć F9, wcisnąć Button1 i.... słychać muzyczkę! [hurra]

wielkie thx