[Komponente] Bass Player Komponente: TBassDLLPlayer (+Demos)

[Cyberbob]

Da du die Fehlermeldung mit der BASS.DLL bekommst, würde ich sagen, das du versuchst die aktuelle Version zu installieren.
In diesem Package sind beide enthalten. Su müsstest also im Packegadialog auswählen, welche Komponenten du Installieren möchtest.
Ansonsten braucht die aktuelle Version die bass.dll

[Tommy1988]

Also, von den allen Downloads lade ich das este runter:

ich öffne es:
BassDLLpkg.dpk

klicke mit der rechten maustaste auf BassDLLpkg.dpk, compilieren. COMPILIEREN klappt,
dann mach ich installieren.
dann kommt: bass.dll nicht gefunden, neuinstallation usw..

ich klicke okdann kommt wieder
packe konnte nicht geladen werden....

Ich hab Delphi2005

Zitat:

Ansonsten braucht die aktuelle Version die bass.dll

Wenn ich die Bass.dll ins Verzeichnis packe sagt der trotzdem dass ich die anwendung neuinstallieren sol..

Was muss ich machen, schritt für schritt?

mache ich das überhaupt richig mit dem BassDLLpkg.dpk??

[Cyberbob]

Wohin hast du die Bass.dll gepackt? Ins Lib-Verzeichnis? Dann kopier so auch nochmal ins Bin-Verzeichnis!

[Tommy1988]

Ok, installieren hat geklappt, jetzt meckert Delphi aber überall--

z.b.

"TBassPlayer enthält kein Element Namens 'status'"

oder

=> "TBassPlayer enthält kein Element Namens 'GetSongLengthAsString'"
[Fehler] Main.pas(328): E2003 Undefinierter Bezeichner: 'GetSongLengthAsString'

[turboPASCAL]

da kann ich im moment nix zu sagen da ich den Quelltext deriner Main.pas ned kenne.

[Tommy1988]

Das Problem ist ja, der Quelltext ist aus der Main.pas von deinem BassPlayer-Source

[turboPASCAL]

Aha, das kann ich ja nicht wissen oder ?

Ersetze in der Main.pas des BassPlayer Demos die Zeile
label2.Caption := BassdllPlayer1.GetSongLengthAsString; durch:
label2.Caption := BassdllPlayer1.GetSongTimeInfo(stUp).asString; in der Timer-Procedure ( procedure TForm1.Timer2Timer(Sender: TObject); ).


Das Demo ist wohl vergessen worden zu aktualisieren...

[Hendi48]

hm, ich hab jetz die Komponente installiert (in Delphi 2007 geöffnet, rechtsklick drauf -> installieren). Wenn ich jetz so einen TBassPlayer auf mein Formular pack, tut der BassPlayer in uses aber das kennt der nicht (Datei nicht gefuden: BassPlayer.dcu)
edit: ah es geht ich hab die ganzen dcu's mal in den lib ordner kopiert

[Tommy1988]

Hallo, ich habe versucht ein Repeat in den Player einzubauene:

Ein Timer wird gestartet, wenn ein Lied läuft, andernfalls ist er aus:

Ist das Lied vorbei, und ein Haken ist bei Repeat (Checkbox) drin, dann wird das lied durch einen simulierten doppelklick auf das selektierte item in der listbox gemacht.

das klappt aber nur 2 mal hintereinander.

desweiteren:
ein Shuffle habe ich versucht zu bauen:
ist ein lied vorbei, so wird ein random gestartet, das random enthält die anzahl der titel
in der listbox.

nach liedende wird ein neues lied selektiert, das klappt, aber es wird, durch simulierten dolleklick nicht abgespielt ?
what's wrong?

[Cyberbob]

Ein Repeat musst du nicht durch ein klicken in den Listboxeintrag realisieren. Es genügt wenn du statt dessen einfach nochmal ein BassDllPlayer.Play machst.
Bei einem Shuffleeffekt würde ich so machen:

Delphi-Quellcode:

BassDllPlayer.LoadFromFile(ListBox1.Items.Strings[Random(ListBox1.Items.Count)]);
BassDllPlayer.Play;

wenn in der Listbox nur die Dateinamen ohne Pfad stehen hat, musst du auf das Array mit den Pfaden über den jeweiligen Index zugreifen.


Gruss,
Christian