summaryrefslogtreecommitdiff
path: root/docview/components
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2013-03-12 17:16:51 +0000
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2013-03-12 17:16:51 +0000
commitb343cd9300b1dc6ae621a496fa6d94528cbf6bf4 (patch)
tree3ffa8410de59f08c433e04ddf75b521e519c03d5 /docview/components
parenta8d679ef78ff5ec0727da2e33da6f10bd82a2583 (diff)
downloadfpGUI-b343cd9300b1dc6ae621a496fa6d94528cbf6bf4.tar.xz
richtext: minor improvement to default used colors
Diffstat (limited to 'docview/components')
-rw-r--r--docview/components/richtext/RichTextStyleUnit.pas2
-rw-r--r--docview/components/richtext/RichTextView.pas2
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;