スクロールをピクセル単位で行うようにした

[fooeditengine/FooEditEngine.git] / Windows / FooEditEngine / FooTextBox.cs

diff --git a/Windows/FooEditEngine/FooTextBox.cs b/Windows/FooEditEngine/FooTextBox.cs
index 8f360e7..76d85cd 100644 (file)
--- a/Windows/FooEditEngine/FooTextBox.cs
+++ b/Windows/FooEditEngine/FooTextBox.cs
@@ -1290,6 +1290,7 @@ namespace FooEditEngine.Windows
             if (e.Handled)
                 return;
 
+            double alignedPage = (int)(this.render.TextArea.Height / this.render.emSize.Height) * this.render.emSize.Height;
             switch (e.KeyCode)
             {
                 case Keys.Up:
@@ -1309,11 +1310,11 @@ namespace FooEditEngine.Windows
                     this.Refresh();
                     break;
                 case Keys.PageUp:
-                    this.Controller.Scroll(ScrollDirection.Up, this.VScrollBar.LargeChange,e.Shift,true);
+                    this.Controller.ScrollByPixel(ScrollDirection.Up, alignedPage,e.Shift,true);
                     this.Refresh();
                     break;
                 case Keys.PageDown:
-                    this.Controller.Scroll(ScrollDirection.Down, this.VScrollBar.LargeChange,e.Shift,true);
+                    this.Controller.ScrollByPixel(ScrollDirection.Down, alignedPage, e.Shift, true);
                     this.Refresh();
                     break;
                 case Keys.Insert: