summaryrefslogtreecommitdiff
path: root/docview
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2010-02-24 00:20:20 +0200
committerGraeme Geldenhuys <graemeg@gmail.com>2010-02-24 00:20:20 +0200
commitbf392ef8db5396c12eeb0adffe47c1e0ed312dc1 (patch)
treed1555ebf23b7d3304323b36379027065b8c590a0 /docview
parent24bc55d1741fd6354ee6e0391c2777604be7a27e (diff)
downloadfpGUI-bf392ef8db5396c12eeb0adffe47c1e0ed312dc1.tar.xz
docview: GetTextAreaWidth already includes ScrollbarWidth in the calculation.
Diffstat (limited to 'docview')
-rw-r--r--docview/components/richtext/RichTextView.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas
index d5733173..39e25d7a 100644
--- a/docview/components/richtext/RichTextView.pas
+++ b/docview/components/richtext/RichTextView.pas
@@ -687,7 +687,7 @@ ProfileEvent('DEBUG: TRichTextView.HandlePaint 4');
if not Debug then
Draw( 0, FLayout.FNumLines )
else
- Canvas.DrawText(8, 8, GetTextAreaWidth-FScrollbarWidth, 1000, FText, [txtLeft, txtTop, txtWrap]);
+ Canvas.DrawText(8, 8, GetTextAreaWidth, 1000, FText, [txtLeft, txtTop, txtWrap]);
ProfileEvent('DEBUG: TRichTextView.HandlePaint 5');
Canvas.ClearClipRect;