Chat mit TURBO DELPHI

[Sherlock]

Neee, das glaube ich nicht denn:

Delphi-Quellcode:

unit Chat_unit;

....

type
  TForm2 = class(TForm)
    MemoRecive: TMemo; // <- Das ist auf dem Form

...

procedure TForm2.ClientSocketReceive(Sender: TObject; Buf: PAnsiChar;
  var DataLen: Integer);
begin;
end;
var
msg: String;
clientsocket : ttcpclient;
memorecive : Tmemo;   // <- Das nicht. Und....
begin;
  msg := Clientsocket.Receiveln(MsG);
  memorecive.Lines.Add(MSG); // <- ...hier wird es verwendet :(
end.

Was mich eigentlich am meisten wundert ist, daß es kompiliert.

Sherlock