Lazarus - прокрутка в редакторе кода

[sunjob]

добрый день

проблему не смог самостоятельно решить-отыскать

прокрутка в редакторе кода - по 12 строк за один клик-вращения колеса мыши, мне не очень комфортно (хотел бы сделать вообще по 1й строке или около того)
ни кто не подскажет, может кто уже решил эту "настройку", возможно в коде Lazarus-a или эта настройка хитро зарыта?!

lazarus-1.2.6 - 3 строки промотка (проблема решена)
lazarus-0.9.31 - 12 строк промотка !!! ПРОБЛЕМА ЕЩЕ ПОКА НЕ РЕШЕНА !!!

спасибо

на скриншотах "сдвиг" на один клик в lazarus-0.9.31

[sign]

Вот, в лазарусе 1.2.6, как-то так:

1.jpg

[sunjob]

спасибо, с новым лазарем проблема решена, но я еще использую старую версию 0.9.31 (в основном) - в нем этих настроек нет, с налету - не смог решить

[Devel0]

Мне под GTK2 помог такой патч:

Код: Выделить всё

diff -r c778361df4ab lcl/interfaces/gtk/gtkwinapi.inc
--- a/lcl/interfaces/gtk/gtkwinapi.inc   Tue May 01 16:38:53 2012 +0200
+++ b/lcl/interfaces/gtk/gtkwinapi.inc   Tue May 01 16:39:59 2012 +0200
@@ -9162,7 +9162,7 @@
     Adjustment^.page_size := ScrollInfo.nPage;
     Adjustment^.page_size := Min(Max(Adjustment^.page_size,0),
                                  Adjustment^.upper-Adjustment^.lower+1);
-    Adjustment^.page_increment := (Adjustment^.page_size/6)+1;
+    Adjustment^.page_increment := 1;
   end;
   if (ScrollInfo.fMask and SIF_POS) <> 0
   then begin
diff -r c778361df4ab lcl/interfaces/gtk2/gtk2wscontrols.pp
--- a/lcl/interfaces/gtk2/gtk2wscontrols.pp   Tue May 01 16:38:53 2012 +0200
+++ b/lcl/interfaces/gtk2/gtk2wscontrols.pp   Tue May 01 16:39:59 2012 +0200
@@ -173,7 +173,7 @@
     LM_HSCROLL: Range := GTK_RANGE(AScrollWindow^.hscrollbar);
   end;
   
-  AValue :=  power(Range^.adjustment^.page_size, 2 / 3);
+  AValue :=  1;
   
   if (AEvent^.direction = GDK_SCROLL_UP) or
      (AEvent^.direction = GDK_SCROLL_LEFT)

т.е. прокрутка на одну строку; взято насколько помню отсюда: http://mantis.freepascal.org/view.php?id=7498

Про другие тулкиты не знаю, но может эта ветка сможет чем-то помочь: http://forum.lazarus.freepascal.org/ind ... ic=13003.0