mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-06 00:40:22 +02:00
SynEdit: fixed pageUp/Down for Column mode selection (thanks dmitry boyarintsev)
git-svn-id: trunk@18960 -
This commit is contained in:
parent
cfab0d6b4e
commit
87664b1185
@ -5874,7 +5874,7 @@ begin
|
||||
{$ENDIF}
|
||||
if eoScrollByOneLess in fOptions then
|
||||
Dec(counter);
|
||||
if (Command in [ecPageUp, ecSelPageUp]) then
|
||||
if (Command in [ecPageUp, ecSelPageUp, ecColSelPageUp]) then
|
||||
counter := -counter;
|
||||
{$IFDEF SYN_LAZARUS}
|
||||
TopView := TopView + counter;
|
||||
|
Loading…
Reference in New Issue
Block a user