Chat mit TURBO DELPHI

[Flips]

Hi,

hier scheint mir irgendwas merkwürdig

Delphi-Quellcode:

procedure TForm2.ClientSocketReceive(Sender: TObject; Buf: PAnsiChar;
  var DataLen: Integer);
begin;
end;
var
msg: String;
clientsocket : ttcpclient;
memorecive : Tmemo;
begin;
  msg := Clientsocket.Receiveln(MsG);
  memorecive.Lines.Add(MSG);
end.