Formatierung eines RichEdit speichern

[TheMiller]

So sieht der CData-Teil aus:

Code:

<![CDATA[HALLO DU DA]]></Schema><Schema Name="dasdsad"><![CDATA[{\rtf1\ansi\ansicpg1252\deff0\deflang1031{\fonttbl{\f0\fnil Tahoma;}}

\viewkind4\uc1\pard\b\f0\fs16 I. Hallo\b0 

\par II. Und wie?

\par 

\par }

 ]]>

Sobald das in der XML steht, ist die Datei nicht mehr wohlgeformt und es gibt Parser-Error.

Wenn dann noch PlainText auf False steht kommt die Meldung: Fehler beim Einfügen der Zeile in TRichEdit.

[mkinzler]

Was passiert, wenn du den "inneren" CDATA-Abschnitt entfernst?

[TheMiller]

Hm... irgendwie auch einen Parser-Error

Code:

<Schema Name="xfgfdgfdg"><![CDATA[]]></Schema>

Delphi-Quellcode:

DomCData:=TDomCDataSection.Create(ParDoc);

  ss := TStringStream.Create ('');
  try
    reSchema.Lines.SaveToStream(ss);
    DomCData.NodeValue:=ss.DataString;
  //DomText.AppendChild(DomCData);

    DomNode.AppendChild(DomCData);
  finally
    ss.Free;
  end;

Node etc alles in Ordnung. Speicherort innerhalb der XML perfekt.

[TheMiller]

So, jetzt funktioniert es. Hatte beim Auslesen einen Fehler. Hier die richtige "Auslese-Funktion":

Delphi-Quellcode:

  ss:=TStringStream.Create('');
  ss.WriteString(Base64Decode(NSchemata.TextContent));
  ss.Position:=0;
  reSchemata.Lines.LoadFromStream(ss);
  ss.Free;

Vielen Dank an alle, die mir geholfen haben!