@Thomas: Das wars mit dem
nil. So geht es:
Delphi-Quellcode:
function TDWJabberSession.GetStatus(AJID: WideString): string;
var
JabberPres : IJabberPres;
begin
JabberPres := FJabberSession.GetPres(AJID, '', True);
if Assigned(JabberPres) then
result := JabberPres.Status;
end;
Ja, er kennt die JOPL. Die gehört zu Exodus und Exodus ist vom gleichen Autor wie der JabberCom
Com-Server. Allerdings blicke ich bei Exodus und der JOPL nicht durch. Die JOPL scheint igrendwie nit Exodus verknüpft zu sein, jedenfalls benötigt sie Dateien aus dem Exodus Projekt und dort braucht man wieder die TNTKontrols, die ich zu Hause mit D6 Personal nicht zum Laufen gebracht habe.