Ich komme nicht hinterher was du vor hast. Willst du Zeichen wie "<" im
XML maskieren? Das geht automatisch wenn man das nicht von Hand als Strings zusammenbastelt sondern eine
Xml-Bibliothek benutzt wie z.B.
Delphi-Quellcode:
implementation uses Xml.XmlIntf,
Xml.XmlDoc;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
xmlDocument: IXMLDocument;
xmlNode: IXMLNode;
resultingString:
String;
asString:
String;
begin
xmlDocument := LoadXMLData('
<event />');
xmlNode := xmlDocument.DocumentElement.AddChild('
address');
xmlNode.Text := Edit1.Text;
xmlNode := xmlDocument.DocumentElement.AddChild('
message');
xmlNode.Text := Edit2.Text;
// Test-Ausgabe
Memo2.Text := xmlDocument.XML.Text;
end;
Ansonsten kannst du auch
System.NetEncoding.THTMLEncoding benutzen.