Objektmethode als Objective-C Callback

[LairdTurner]

Hallo!

Leider funktioniert das nicht

Code:

outputcallbackStruct.inputProcRefCon := KlugerVariablenName

Egal ob man nun 'nil', oder die Referenzvariable übergibt geht er im Anschluss immer in das if

Code:

class function TMyCallbackClass.OutputCallback(inRefCon: Pointer; ioActionFlags: PAudioUnitRenderActionFlags; inTimeStamp: PInteger; inBusNumber, inNumberFrames: UInt32; ioData: PInteger): OSStatus;
var
  Instance: TMyCallbackClass;
begin
  if inRefCon <> nil then
  begin
    Instance := TMyCallbackClass(inRefCon);
    Instance.RufeVUMeterEventAuf(); // Beispiel!
  end;
end;

rein.

Da scheint der Pointer nicht richtig gesetzt zu werden, denn auch wenn ich die Referenz übergebe, dann erhalte ich eine Ausnahmeverletzung bei der Abarbeitung des Events, denn der Compiler erkennt die Membervariable 'FVUMeterEvent' als Assigned, obwohl sie nicht Assigned ist

Code:

procedure TMyCallbackClass.RufeVUMeterEventAuf;
begin
  if Assigned(FVUMeterEvent) then
  begin
    FVUMeterEvent;
  end;
end;

also an dem Event nichts angehängt wurde.