BASS.dll (FX): BPM aus RecordStream

[Delphi-Narr]

Jeweils Version 2.4

Im DuffRecording gebe ich immer True zurück:

Delphi-Quellcode:

function DuffRecording(handle : HRECORD; const Buffer : Pointer; Length : DWORD; user : Pointer) : Boolean; stdcall;
begin
  Result := True;   // continue recording
end;

Ansonsten habe ich keine weiteren Parameter gesetzt - vielleicht liegt das dann daran?!

Viele Grüße

[EWeiss]

EDIT:
Ich denke es liegt hier dran.
BASS_FX_BPM_BeatCallbackSet nicht BASS_FX_BPM_CallbackSet.

BASS_FX_BPM_CallbackSet = return(Beat Position)
BASS_FX_BPM_CallbackSet(chan, @GetBPM_Callback, StrToFloat(ebPeriod.Text), 0, BASS_FX_BPM_MULT2, nil)

BASS_FX_BPM_BeatCallbackSet = return(BPM pro definierter Sekunden)
BASS_FX_BPM_BeatCallbackSet(chan, @GetBeatPos_Callback, nil)

gruss

[Delphi-Narr]

Danke,

das sollte auf jeden Fall schonmal nen Unterschied machen - leider klappt es immer noch nicht.

Ich habe mal die Bass Units aus dem Projekt von dir genommen und hoffentlich alles angepasst.

Dennoch tritt nach
  BASS_FX_BPM_BeatCallbackSet(ChannelR, @bpmproc, 0); eine Zugriffsverletzung in der DLL auf...

Anbei mal die gesamte Unit, die ist betzüglich des Ablaufs mit deinem Beispielprojekt identisch soweit ich das sehe...

EDIT
Doch nicht...

[EWeiss]

Habe meinen Beitrag editiert..


Nebenbei
BASS_FX_BPM_BeatCallbackSet(ChannelR, @bpmproc, 0);

gleicht
BASS_FX_BPM_BeatCallbackSet(ChannelR, @bpmproc, nil);

gruss

[Delphi-Narr]

Bei der Verwendung von nil als drittem Parameter meckert der Compiler, da Cardinal und Pointer inkompatibel sind.

Den Edit hatte ich bemerkt - die andere Funktion nutze ich ja bereits. Die führt jetzt nur zu einer Zugriffsverletzung statt zu einer OOB Exception.

Oder habe ich da jetzt was übersehen?

[EWeiss]

Zitat von Delphi-Narr:

Bei der Verwendung von nil als drittem Parameter meckert der Compiler, da Cardinal und Pointer inkompatibel sind.

Den Edit hatte ich bemerkt - die andere Funktion nutze ich ja bereits. Die führt jetzt nur zu einer Zugriffsverletzung statt zu einer OOB Exception.

Oder habe ich da jetzt was übersehen?

Sorry keine Ahnung was du da verwendest
function BASS_FX_BPM_BeatCallbackSet(handle: DWORD; proc: BPMBEATPROC; user: Pointer): BOOL;

ist bei mir ein Pointer = Nil kein Cardinal = 0

Lade dir doch bei Un4Seen mal die letzte Version herunter
Sonst wird das nie was
Dort ist auch ein BPM Sample enthalten.

gruss

[Delphi-Narr]

Die aktuelle Version habe ich jetzt runtergeladen und es funktioniert sogar

Wobei es auch mit der alten funktioniert - wenn ich die Callback Methode exakt so benenne wie im Beispiel...

Habe es jetzt mit beiden Versionen getestet:

procedure GetBeatPos_Callback(handle: DWORD; beatpos: DOUBLE; user: Pointer); stdcall; klappt,

procedure irgendwas(handle: DWORD; beatpos: DOUBLE; user: Pointer); stdcall; klappt nicht...
Sehr interessant^^

Oder es lag an irgendwelchen Build-Artefakten, die das verunreinigt haben...