summaryrefslogtreecommitdiff
path: root/docview
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-08-06 17:05:56 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-08-06 17:05:56 +0200
commitcb3a155bf586296264984c10c9df7f0a9cb5f016 (patch)
treef3f29f4c6dc815b329b64a50b0fa4e4cafd59d9b /docview
parentf1a087f9ed783c6159ec96c9e1c64d6e4d0f9512 (diff)
downloadfpGUI-cb3a155bf586296264984c10c9df7f0a9cb5f016.tar.xz
docview: Code cleanup, removing already commented code.
Diffstat (limited to 'docview')
-rw-r--r--docview/components/richtext/RichTextDisplayUnit.pas7
1 files changed, 3 insertions, 4 deletions
diff --git a/docview/components/richtext/RichTextDisplayUnit.pas b/docview/components/richtext/RichTextDisplayUnit.pas
index fb3a2609..c3f15156 100644
--- a/docview/components/richtext/RichTextDisplayUnit.pas
+++ b/docview/components/richtext/RichTextDisplayUnit.pas
@@ -203,8 +203,7 @@ ProfileEvent('DEBUG: DrawRichTextLine >>>');
begin
// we haven't yet started drawing:
// so work out alignment
- X := Start.X{ * FontWidthPrecisionFactor}
- + Layout.GetStartX( Style, Line );
+ X := Start.X + Layout.GetStartX( Style, Line );
StartedDrawing := true;
end;
@@ -262,7 +261,7 @@ ProfileEvent('DEBUG: DrawRichTextLine >>>');
inc( X, FontManager.CharWidth( ' ' ) );
Layout.PerformStyleTag( Element.Tag, Style, X );
- NewMarginX := ( Start.X + Style.LeftMargin ){ * FontWidthPrecisionFactor};
+ NewMarginX := ( Start.X + Style.LeftMargin );
if NewMarginX > X then
begin
//skip across...
@@ -305,7 +304,7 @@ ProfileEvent('DEBUG: DrawRichTextLayout >>>');
LineIndex := 0;
// debug only to show Margins.
- //FontManager.Canvas.Color:= clBlue;
+ //FontManager.Canvas.Color:= clRed;
//FontManager.Canvas.DrawLine(0, y, 300, y);
repeat