diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2013-03-12 17:16:51 +0000 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2013-03-12 17:16:51 +0000 |
| commit | b343cd9300b1dc6ae621a496fa6d94528cbf6bf4 (patch) | |
| tree | 3ffa8410de59f08c433e04ddf75b521e519c03d5 | |
| parent | a8d679ef78ff5ec0727da2e33da6f10bd82a2583 (diff) | |
| download | fpGUI-b343cd9300b1dc6ae621a496fa6d94528cbf6bf4.tar.xz | |
richtext: minor improvement to default used colors
| -rw-r--r-- | docview/components/richtext/RichTextStyleUnit.pas | 2 | ||||
| -rw-r--r-- | docview/components/richtext/RichTextView.pas | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/docview/components/richtext/RichTextStyleUnit.pas b/docview/components/richtext/RichTextStyleUnit.pas index 57f904df..e0cc3b62 100644 --- a/docview/components/richtext/RichTextStyleUnit.pas +++ b/docview/components/richtext/RichTextStyleUnit.pas @@ -363,7 +363,7 @@ begin FHeading3Font := fpgGetFont(DefaultTopicFontName + '-10:bold'); FDefaultColor := clBlack; - FDefaultBackgroundColor := clWhite; + FDefaultBackgroundColor := clBoxColor; FDefaultAlignment := taLeft; FDefaultWrap := true; diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas index db8f8d86..fe38017f 100644 --- a/docview/components/richtext/RichTextView.pas +++ b/docview/components/richtext/RichTextView.pas @@ -692,7 +692,7 @@ begin Canvas.ClearClipRect; DrawBorder; DrawRect := GetDrawRect; - Canvas.Color := BackgroundColor; + Canvas.Color := RichTextSettings.DefaultBackgroundColor; Canvas.FillRectangle(DrawRect); TextRect := GetTextAreaRect; |