|
Registriert seit: 14. Mär 2004
Ort: Witterschlick (bei Bonn)
51 Beiträge
Delphi 6 Professional
|
Re: RichEdit Textformatierung
26. Mär 2004, 18:47
yo genau, DEINTEXT ist dieser Text (bzw. das richedit, in dem er steht)
also mein code erstellt erst mal ein temporäres richedit (mir fällt grade auf, dass TStringList genau so gut ginge^^) und schreibt an den Anfang den rtf-header (den hab ich aus irgendeiner rtfdatei geklaut, da ich den rtfcode auch nicht ganz verstehe...)
dann wird "{" durch "\b" (\b=rtf für bold) und "}" durch "\b0" (steht für "ende bold") ersetzt
das mit \par ist nur nötig, falls zeilenumbrüche vorkämen...
am Ende wird dann noch "}" angefügt (bei delphi/pascal entspräche das dem "end.")
dann wird das ganze wieder an DEINTEXT zurückgegeben (richedit1.text:=temptext.text)
also geht mein beispielcode davon aus, dass da noch ganz unformatiert der ausgangstext steht, da { direkt durch die formatierung ersetzt wird (und nicht wie bei dir erst geboldet und erst hinterher wird "{" gelöscht)
WICHTIG: wenn am anfang der text an die replace funktionen übergeben wird, darf er noch kein rtfcode sein, sondern regulärer "memo oda edit-text", da sonst die im rtfcode enthaltenen "{"s bzw. "}"s auch ersetzt werden!
|