IDTCP Client werte fest senden, weis keinen besseren Titel

[dasdaniel]

ich denke da wirst du nicht herumkommen etwas zu schreiben...


Client;

Code:

procedure TForm1.IdTCPClient1Connected(Sender: TObject);
begin
   IdTCPClient1.WriteLn('MeinName'); 
end;

Server

Code:

procedure TForm1.IdTCPServer1Connect(AThread: TIdPeerThread);
  var sSeinName:String;
begin
  sSeinName := Athread.Connection.ReadLn;
end;

mfg

#dasdaniel