Frequenzen bei wav/mp3-dateien

[SleepyMaster]

Ja! Ich weiß ich nerv!

Aber es läuft immer noch nicht!
Sobald
  bassplayer := TBassplayer.create(Form1.handle); ausgeführt wird, wird das Programm ohne Fehlermeldung beendet!

Aber vermutlich nur weil ich da was falsches reingesetzt hab (Damit Delphi das auch coplimiert):


Original:

Delphi-Quellcode:

constructor TBassPlayer.create(mainwindowhandle: HWND);
begin
  inherited create;;
  if BASS_GetVersion() <> MAKELONG(1, then Halt;
  BASS_Init(-1, 44100, BASS_DEVICE_LEAVEVOL, mainwindowhandle);
  BASS_Start;
end;

Meins:

Delphi-Quellcode:

constructor TBassPlayer.create(mainwindowhandle: HWND); 
begin 
  inherited create;; 
  if BASS_GetVersion() <> MAKELONG(1,1) then Halt;
  BASS_Init(-1, 44100, BASS_DEVICE_LEAVEVOL, mainwindowhandle); 
  BASS_Start; 
end;

Was muss in die Zeile wirklich rein???
  if BASS_GetVersion() <> MAKELONG(1,1) then Halt; Was macht makelong????