Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Richedit mit Delphi Berlin 10.1, Wörter färben geht nicht mehr (https://www.delphipraxis.net/192091-richedit-mit-delphi-berlin-10-1-woerter-faerben-geht-nicht-mehr.html)

Laaeris 19. Mär 2017 18:03


Richedit mit Delphi Berlin 10.1, Wörter färben geht nicht mehr
 
Liste der Anhänge anzeigen (Anzahl: 2)
Hallo zusammen,

jahrelang hat der folgende Codeschnipsel zum Färben einzelner Wörter einwandfrei funktioniert, nach dem Update geht das nicht mehr:
Delphi-Quellcode:
                  Form_Hauptuebersicht.QRichEdit[wohin].SelStart:=LTPos[wohin]+Pos(Gastname,LT_alle[k].LT[i].Ereignistext1)-1;
                  Form_Hauptuebersicht.QRichEdit[wohin].SelLength:=length(Gastname);
                  Form_Hauptuebersicht.QRichEdit[wohin].SelAttributes.Color:=clBlue;
                  Form_Hauptuebersicht.QRichEdit[wohin].SelAttributes.Style:=[fsBold];
                  Form_Hauptuebersicht.QRichEdit[wohin].SelLength:=0;
Interessant ist, dass sowohl das Bold als auch (testhalber) ein anderer Schrifttyp funktioniert. Die Farbe jedoch wird irgendwie überschrieben. Wenn ich das RTF mit Text fülle, dann sehe ich kurzzeitig den blauen Text, am Ende der Füllung ist jeoch alles weiss. Woran liegt das?
Ich verwende das Erscheinungsbild "Golden Graphite". Und wie gesagt, ich komme von Delphi XE7, dort und rückwärts bis zu Delphi XE2 hat alles funktioniert.

Viele Grüße

David

Uwe Raabe 19. Mär 2017 18:09

AW: Richedit mit Delphi Berlin 10.1, Wörter färben geht nicht mehr
 
Wähl mal bei dem RichEdit im Property StyleElements das seFont ab.

Laaeris 20. Mär 2017 17:47

AW: Richedit mit Delphi Berlin 10.1, Wörter färben geht nicht mehr
 
...guter Tipp, vielen Dank. So einfach kann es manchmal sein!

Viele Grüße

David


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:29 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz