Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
Re: RichEdit. String in Bold hinzufügen.
14. Feb 2008, 15:12
Klar, Lines.Add fügt ja auch eine neue Zeile ein. Ein etwas umständliches Beispiel:
Delphi-Quellcode:
var s1, s2: string;
begin
s1 := 'fett ';
s2 := 'nicht mehr fett';
RichEdit1.SelAttributes.Style := [fsBold];
RichEdit1.Lines.Add(s1 + s2);
RichEdit1.SelStart := Length(RichEdit1.Text) - 2 - Length(s2);
RichEdit1.SelLength := Length(s2);
RichEdit1.SelAttributes.Style := [];
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|