Methode wird vom Automatisierungsobjekt nicht unterstützt

[Luckie]

Ich reagiere auf folgende Nachricht:
OnMessage(Msg: IJabberMsg; Tag: IXMLTag) Das sieht bei mir so aus:

Delphi-Quellcode:

procedure TDWJabberMsg.FOnMessageEvent(Sender: TObject; var Msg: OleVariant; var Tag: OleVariant);
begin
  ShowMessage(Msg.FromJID);
  if Assigned(OnDWMessage) then
  begin
    FOnMessage(self, Msg, Tag);
  end;
end;

Jetzt kommt aber die Exception, dass die Methode FromJID nicht von dem Automatisierungsobjekt unterstützt wird. Obwohl sie eigentlich im Interface deklariert ist:

Delphi-Quellcode:

IJabberMsg = interface(IDispatch)
    ['{2AE8D231-B888-11D3-AECB-00A076A018E8}']
    ...
    property FromJID: WideString read Get_FromJID write Set_FromJID;
    ...
end;

Wie komme ich jetzt da dran, um die Werte auszugeben?