irc + clientsocket

[mr.unbekannt]

und noch ne frage:
ich habe:

Delphi-Quellcode:

procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
memo1.Lines.Add(socket.ReceiveText);
end;

procedure TForm1.ClientSocket1Write(Sender: TObject;
  Socket: TCustomWinSocket);
begin
memo1.Lines.Add(socket.ReceiveText)
end;

und bekomme keien daten ins memofeld außer das was das programm ausgibt, also memo1.Lines.Add('connect'); wieso?