guten Morgen
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
Ich hab es immer in OnCreate der Form versucht aber das ist ja Quatsch
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}