diff options
| -rw-r--r-- | docview/components/richtext/RichTextView.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas index 8eee11b0..5fa57ffc 100644 --- a/docview/components/richtext/RichTextView.pas +++ b/docview/components/richtext/RichTextView.pas @@ -2002,12 +2002,12 @@ end; Procedure TRichTextView.UpPage; begin - SetVerticalPosition( FVScrollbar.Position - FVScrollbar.PageSize ); + SetVerticalPosition( FVScrollbar.Position + FVScrollbar.PageSize ); end; Procedure TRichTextView.DownPage; begin - SetVerticalPosition( FVScrollbar.Position + FVScrollbar.PageSize ); + SetVerticalPosition( FVScrollbar.Position - FVScrollbar.PageSize ); end; Procedure TRichTextView.SmallScrollUp; |