Chat mit TURBO DELPHI

[PaddyL]

Zitat von .Bartipapi:

Ich weiss... sehr unaufgeräumt
Ist aber auch egal...

Nein, ist es nicht, sonst waere so ein Fehler gar nicht erst aufgetaucht.

Delphi-Quellcode:

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

end.

Ach und nur so: Der Code wird auch so nicht gehen, da memorecive nicht initialisiert ist, geschweigedenn das es irgendwie sichtbar ist.