welchen willst du denn genau haben ?
sind ja quasi zwei unterschiedliche programme
also das ist vom send-button
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var text:string;
begin
text:=edit1.Text;
memo1.Lines.Add('Client: '+text+'');
form2.ServerSocket1.Socket.SendText(edit1.text);