Hallo,
der String soll über Socket versendet werden. Das geht auch!
Nur die Umlaute kommen als ??? an
Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
s: String;
begin
socket.Open;
s := String.Format('<event>'#10'<address>%s</address>'#10'<message>%s</message>'#10'</event>',[Edit1.Text,Memo1.Text]);
socket.Socket.SendText(s);
socket.Close;
end;