Delphi-PRAXiS - Delphi Fontstyle im richedit ändern

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Fontstyle im richedit ändern (https://www.delphipraxis.net/32678-fontstyle-im-richedit-aendern.html)

Akut-Programming

27. Okt 2004 09:09

Fontstyle im richedit ändern

:hi:

Wie ist es mir möglich, den Fontstyle z.b. fett des textes in einem richedit zu setzen? Das gleiche würde mich auch für selektierten Text interessieren. Mit RichEdit1.SelAttributes.Style[fsBold]; klappt es nicht. :gruebel:

Gruß,
Sascha

Treffnix

27. Okt 2004 09:14

Re: Fontstyle im richedit ändern

du musst zuerst mit Hilfe von .Selstart und .SelLength Text markieren. Dann kannst du dessen Formatierung ändern. Ist bereits Text von Hand ( bzw. von Maus ) markiert, sollte es schon klappen.

Sharky

27. Okt 2004 09:15

Re: Fontstyle im richedit ändern

Hai Sascha,
mit

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

  RichEdit1.SelAttributes.Style := [fsbold];

end;

kann ich den markierten Text ohne Probleme "Fett" machen *g*

glkgereon

27. Okt 2004 09:22

Re: Fontstyle im richedit ändern

wobei du damit die anderen fgormatierungen wie kursiv kaputt machst....

ich habs mal so gelöst:

Delphi-Quellcode:

			if fsbold in richedit1.SelAttributes.Style

then richedit1.SelAttributes.Style:=richedit1.SelAttributes.Style-[fsbold]

else richedit1.SelAttributes.Style:=richedit1.SelAttributes.Style+[fsbold];

Akut-Programming

27. Okt 2004 09:33

Re: Fontstyle im richedit ändern

Hai Sharky, Treffnix & glkbkk,

dank euch für eure Hilfe funzt Prima! :thumb:

Gruß,
Sascha

Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr.