String über Socket senden

[strom]

Hallo,

wenn ich die Strings durch ein EDit1.Text und Memo1.Text ersetze,
geht es leider nicht mehr.

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
    var
  s: String;
begin
    try
       ClientSocket1.Open;
    s := String.Format(
     '<event>'#10'<address>%s</address>'#10'<message>%s</message>'#10'</event>',
     [Edit1.Text,Memo1.Text]);
    ClientSocket1.Socket.SendText(s);
    finally
      ClientSocket1.Close;
    end;
end;