sockety w delphi

polaczylem sobie dwa computery, klienta i serwer i informacje od serwera do klienta przesylam tak:

ServerSocket1.Socket.Connections[ServerSocket1.Socket.ActiveConnections -1].SendText(edit3.Text);


procedure TForm1.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
begin
button3.Enabled:=true;
Memo1.Lines.Add('<' + edit4.Text + '>:' + ' ' + Socket.ReceiveText);
end;

ale jak przeslac z klienta do serwera?

// po co to samo pytanie dwa razy? - ŁF

clientsocket1.socket.sendtext('Jan Kowalski');