Keine Antwort von TICQClientMessageRecv

[Chegga]

Hi,

ich bin gerade dabei einen ICQ Bot zu erweitern.
Ich schreibe über ICQClient1.SendMessage(StrToInt(Edit3.Text), Memo2.Text); eine Nachricht,
die ohne Probleme ankommt.
Um die Antwort des Chat-Partner einzulesen,
verwende ich das hier:

Delphi-Quellcode:

procedure TForm1.ICQClient1MessageRecv(Sender: TObject; Msg, UIN: String);
begin
  Memo1.Lines.Add('Du erhälst diese Nachricht von ' + UIN + ': ' + Msg);
end;

(Ich benutze die TICQClient Komponente)
Was mache ich falsch?

MfG Marc