bass.dll einbinden

[newuser01]

Hallo

Wie schon hier beschrieben möchte ich die bass.dll fest in meinem Programm einbinden so das ich diese nicht mitliefern muss. Nun hat ja "Carlo91" aud diesem Beitrag schon eine Lösung vorgeschlagen und zwar die dll als Resource einzubinden. Das Beispiel was er dort mit beigelegt hat funktioniert auch soweit, nur ich benutze die Komponenten von Torry (BassPlayer) diese greifen extern auf die bass.dll Version 2.1 zurück. Ich wollte also die dll.res aus seinem Beispiel in meinem Projekt übernehmen. Jetzt kam folgende Fehlermeldung beim starten des Programms Fehler: "connon support dual channel mode" und Fehler: "beim lesen von BassPlayer.VisScale:" Ich vermute mal das es an der Version der bass.dll liegt denn wenn ich die Version 2.1 (bass.dll) ins Verzeichnis des Projekts kopiere startet die Anwendung Fehlerfrei. Kopiere ich aber die Version 2.3 (bass.dll) ins Verzeichnis kommt der besagte Fehler. Ist es möglich die bass.dll Version 2.1 die ich habe und fürs Projekt benötige als Resource so einzubinden wie es "Carlo91" in seinem Beispiel gemacht hat ? und funktioniert dann die Anwendung auch ohne mitgelieferte dll ?. "Carlo91" hat mir schon wie er sagt mit Visual C++ die bass.dll 2.1 zur bass.res kompiliert es funktioniert aber trotzdem nicht nach einbindung dieser *.res gleiche Fehlermeldung wenn sich die dll nicht im Verzeichnis befindet.

[Nils_13]

Hi,

der Bassdllplayer enthält doch die Bass.dll und du musst sie nicht mitschicken, oder :gruebel: ?

[newuser01]

Zitat:

der Bassdllplayer enthält doch die Bass.dll und du musst sie nicht mitschicken, oder Grübelnd... ?

Nicht Bassdllplayer sondern TBassPlayer (Torry Komponente TBASSPlayer v.1.81)und da muss die dll mitgeschickt werden

[noch_ein_hannes]

... schau mal hier: Bass_Dynamic.pas ... ganz unten ist ein Download der Unit
grüsse,
hannes

[newuser01]

Hallo Hannes ich habe es versucht mit der Bass_Dynamic.pas aber meine Anwendung lässt sich trotzdem nicht ohne der bass.dll starten. Ich habe jetzt mal ein Bass-Demo erstellt und die dazugehöriege Torry Komponente(TBassPlayer)mit beigepackt. Vielleicht bekommt ihr es ja hin das dieses Bass-Demo ohne der bass.dll läuft aber wie schon erwähnt es muss die gleiche Komponente (TBassPlayer) bleiben und mit dieser muss es funktionieren da ich sonst mein ganzen Projekt umschreiben müsste.

[newuser01]

keiner einer Idee ?

[omata]

Doch, hatte ich ja im anderen Thread schon geschrieben. Konkret zu diesem Problem siehe Anhang. Wie gesagt, wenn dir ein Channel reicht...

Aber fang jetzt nicht an auch noch den Wunsch zu haben Erweiterungs-Dlls einbinden zu wollen, das Thema hatten wir schon.

Tja und dann hab ich es auch gesehen: Dort werden Erweiterungs-Dlls eingebunden. Dann geht meine Variante nicht. Es gibt noch eine zweite Möglichkeit. Die habe ich ja schon als Link im anderen Thread angegeben, sorry.

Gruss
Thorsten

[Balu der Bär]

Zitat:

Zitat von newuser01

Nicht Bassdllplayer sondern TBassPlayer (Torry Komponente TBASSPlayer v.1.81)und da muss die dll mitgeschickt werden

Falsch. TBassdllPlayer solltest du dir angucken, einfach Komponente installieren und gut is. Und die DLL muss auch nicht mitgegeben werden. :zwinker:

http://www.delphipraxis.net/internal...ct.php?t=55395

[Nils_13]

Zitat:

Zitat von Balu der Bär

Zitat:

Zitat von newuser01

Nicht Bassdllplayer sondern TBassPlayer (Torry Komponente TBASSPlayer v.1.81)und da muss die dll mitgeschickt werden

Falsch. TBassdllPlayer solltest du dir angucken, einfach Komponente installieren und gut is. Und die DLL muss auch nicht mitgegeben werden. :zwinker:

http://www.delphipraxis.net/internal...ct.php?t=55395

Falsch. Seine Komponente heißt zum Einen BassPlayer, nicht Bassdllplayer und zum Anderen ist es eine komplett andere Komponente.

@newuser01: Bleib erstmal bei deiner Komponente oder benutz gleich die Bassdll.

[newuser01]

Zitat:

@newuser01: Bleib erstmal bei deiner Komponente

Ja genau darum geht es ich möchte die Komponente eigentlich behalten und trotzdem die dll fest einbinden. Wenn es aber nicht geht werde ich mich leider nach einer anderen Lösung umschauen müssen. Nur die dll benutzen ohne Komponente naja ich finde da ist der Code dann ein wenig komplizierter. Allein schon die Visualisierung wie in BassPlayer umzusetzen stell ich mir nicht so einfach vor :(

Man kann halt nicht alles haben :mrgreen:

[Balu der Bär]

Zitat:

Falsch. Seine Komponente heißt zum Einen BassPlayer, nicht Bassdllplayer und zum Anderen ist es eine komplett andere Komponente.

Das ist mir durchaus bewusst. :roll:

Zitat:

die Komponente eigentlich behalten und trotzdem die dll fest einbinden.

Wie gesagt es wäre wohl durchaus einfach auf diese Komponente umzustellen, die Funktionen & Methoden sollten sich stark ähneln. Es ist mit der anderen Komponenten jedenfalls weniger Aufwand als die DLL fest einzubinden.

[Nils_13]

Balu kann ich da nicht zustimmen, nimm die aktulle Bassversion und du kriegst das auch so hin und wirst in Zukunft nicht mehr so viele Probleme haben. Du lernst mit der DLL sowieso viel mehr, da musst du nicht nur [Komponente].Machmal aufrufen.

@Balu: Du sagtest Falsch und da wollte ich dich nur korrigieren.

[newuser01]

Ich versuche jetzt das Projekt umzustellen

Delphi-Quellcode:

//1. Problem

//vorher mit TBassPlayer Komponente
lSongLaenge.Caption := FormatDateTime ('nn:ss', BassPlayer1.PlayLength / (1000 * 24 * 60 * 60))+' -->';

//jetzt ohne Komponente funktioniert aber leider nicht
lSongLaenge.Caption := FormatDateTime ('nn:ss', BASS_ChannelGetLength(Channel) / (1000 * 24 * 60 * 60));

Delphi-Quellcode:

//2. Problem

//vorher mit TBassPlayer Komponente
lSongPosition.Caption := FormatDateTime ('nn:ss', BassPlayer1.Position / (1000 * 24 * 60 * 60));

//jetzt ohne Komponente funktioniert aber leider nicht
lSongLaenge.Caption := FormatDateTime ('nn:ss', BASS_ChannelGetPosition(Channel) / (1000 * 24 * 60 * 60));

und gibt es ein Demo bezüglich Equalizer einbinden ?

[newuser01]

guten Morgen :mrgreen:

Hat sich erledigt ich habe die bass.dll als Resource eingebunden und kann meine Komponente doch weiter verwenden. Ich war vorher nur zu blöd dies zu realisieren :mrgreen: Ich hab es immer in OnCreate der Form versucht aber das ist ja Quatsch :-D

Delphi-Quellcode:

//direkt in der Project.dpr dann geht es  :-D   
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},FileCtrl,Windows, Messages, SysUtils, Classes, Graphics, Controls,Dialogs,StdCtrls;

{$R *.RES}

begin

 
if not FileExists(ExtractFilePath(Application.ExeName)+'\bass.dll') then
begin
 //create dll
 DLLRes :=TresourceStream.CreateFromID(0, 101, PChar('DLL'));
 DLLres.SaveToFile(ExtractFilePath(Application.ExeName)+'\bass.dll');
end
   else
       begin
          //dll vorhanden
end;//if


Application.Initialize;
Application.Title := 'Form1';
Application.CreateForm(TForm1, Form1);
Application.Run;

end.

Delphi-Quellcode:

unit Unit1;
//in unit1 noch folgendes
var
  DLLRes: TResourceStream;
implementation

uses Unit1;

{$R *.DFM}
{$R DLL.res}