Bass.dll einbinden?

[Tommy1988]

Also ich dachte mit dem Code hier wär das Problem gelöst:

Delphi-Quellcode:

var
  Form1: TForm1;
  DLLRes: TResourceStream;

implementation

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

function TempDir: String;
begin
  Result := SysUtils.GetEnvironmentVariable('temp');
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  DeleteFile(TempDir+'\bass.dll');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  if not FileExists(TempDir+'\bass.dll') then
  begin
    DLLRes :=TresourceStream.CreateFromID(0, 101, PChar('DLL'));
    DLLres.SaveToFile(TempDir+'\bass.dll');
  end;
  if FileExists(TempDir+'\bass.dll') then ShowMessage(':-)')
  else ShowMessage(':-(');
end;

Aber wenn ich den einfüge und BASS (Bass.pas ist die Unit zur Bass.dll)aus den Uses nehme
erhate ich den Fehler in dieser Zeile:
  chan: HSTREAM = 0; HStream wär nicht definiert/deklariert.

Das Hstream steht ja natürlich in der Bass.pas.. aber ich möcht die ja gern so wie im Beispiel oben einbinden