BASS.dll/Playlist

[Nils_13]

Hi,

1.
mit der BASS.dll spielt man mit siesem Befehl in Delphi einen geladenen Sound ab:
BASS_StreamPlay(Channel, False, 0); Nur wie funktioniert Stop, Pause, Next etc.

2.
Wie funktioniert eine Playlist mit der BASS.dll
Bei meinem alten Player habe ich die MediaPlayer Komponente verwendet nur jetzt verwende ich die BASS.dll, dass gibt halt ein paar kleine/große probleme.
Manchmal gibt es bei mir Erläuchtungen ... nur diesmal ergibt es
...

[fkerber]

Hi!

Bitte für jede Frage einen neuen Thread, sonst wird das so unübersichtlich hier


Ciao Frederic

[Matze]

Die DP hat eine hervorragende Suchfunktion:

http://www.delphipraxis.net/internal...=unit+bass+dll

[Nils_13]

Hi,

wenn ich
BASS_STOP; verwende kann ich nichts mehr abspielen, aber warum?

[fkerber]

Hi!

Hast du dir den Link überhaupt mal angeschaut?

Auszug:

Delphi-Quellcode:

[...]
procedure TBassPlayer.stop; 
begin 
  BASS_ChannelPause(channel); 
  position := 0; 
end; 

procedure TBassPlayer.pause; 
begin 
  BASS_ChannelPause(channel); 
end; 

procedure TBassPlayer.resume; 
begin 
  BASS_ChannelResume(channel); 
end;
[...]

Ciao Frederic

[Nils_13]

Und wrarum kommt dann der Fehler: 'INkompatible Typen: TPosition und Integer'?

[Luckie]

Weil TPosition nicht vom Typ Integer ist?

Im ASrchiv von der Bass.ddl liegen so viel ich weiß Demos bei, auch für Delphi. Desweiteren ist die Hilfe sehr gut. Es war mir ohne weiterers möglioch meinen MP3 Player damit zu programmieren, ohne dass ich auf größere Probleme gestossen bin.

[Nils_13]

@Luckie: thx

Da du gut programmieren kannst würde ich sehr gerne deinen mal sehen.

Nur noch die Playlist anfertigen, thx for all!

[fkerber]

Hi!

Zitat von Nils_13:

Da du gut programmieren kannst würde ich sehr gerne deinen mal sehen.

Dann schau mal auf seiner Homepage vorbei: www.luckie-online.de


Ciao Frederic

[Nils_13]

Hi,

@fkerber: den dwonload kann ich nicht finden!

@all:
ich hab bei der Playlist ausgewählte Lieder mit

Delphi-Quellcode:

procedure TFormPlayer.playClick(Sender: TObject);
var i: Integer;
begin
i := playlist.ItemIndex;
Channel := BASS_StreamCreateFile(FALSE, PChar(op.FileName), 0, 0, 0);
BASS_StreamPlay(Channel, False, 0);

if i >= 0 then
BASS_StreamPlay(Channel, False, 0);
end;

abgespielt, nur wie spielt mal alle Lieder die in der ListBox vorhanden sind ab?