Richedit: an vorhandenen Text weiteren Text anfügen

[Jürgen Marx]

Hallo,

wie kann ich an einen bereits vorhanden Text weiteren Text anfügen.
Der anzuhängende Text stammt aus einem Datenbankfeld und soll dann angehängt werden.

Ich habe es schon mittels LoadFromStream probiert, wobei dann immer nur der zuletzt gewählte Text übernommen wird. Der vorherige Text ist dann weg.

Hat jemand eine Idee?

[Jochen Reichenberg]

In einer neuen Zeile:
>RichEdit->Lines->Add(anzuhängender Text);

Wenn der Text, ohne Zeilenumbruch angehängt werden soll;
>RichEdit->Text = RichEdit->Text + anzuhängeder Text;

Grüße Joche

[Stephan J.]

und wie lösch ich die Texte wieder?

Mit Lines->Del gehts ja net..

und auch Count-1 geht net...


Steh iwi aufm Schlauch.....

[Christian Marquardt]

RichEdit->Lines->Delete(x)
RichEdit->Lines->Clear()

[tinof]

Hi,

Lines.Add bzw. .Text:=...

berücksichtigen jedoch beide nicht die Formatierungen und Schriftarten im Richedit. Sofern es erforderlich ist, z.B. auch in farbigen Text etwas einzufügen o.ä. geht auch

re.selstart:=length(re.text)
re.seltext:='mein Text'