Ich habe hier ein ein Interface mit Events vorliegen:
Delphi-Quellcode:
IJabberSessionEvents = dispinterface
['{F6C7A23B-B7B1-11D3-AECB-00A076A018E8}']
procedure OnConnect; dispid 1;
procedure OnDisconnect; dispid 2;
procedure OnAuthError(const ErrorText: WideString); dispid 3;
procedure OnCommError(const ErrorText: WideString); dispid 4;
...
...
...
Wie kann ich die nun nutzen? Hat da mal jemand ein kleines Beispiel für mich?
Wenn ich schreibe:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
JabSes: JabberSession;
begin
JabSes.Server := txtServer.Text;
JabSes.Port := StrToInt(txtPort.Text);
JabSes.Username := txtUser.Text;
JabSes.Password := txtPass.Text;
JabSes.On..
JabSes.DoConnect(False, jatPlainText);
dann kommt in Zeile 9 keine Codevervollständigung, die mir ein Event oder so vorschlägt.
