mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-19 09:09:32 +02:00
VirtualTreeView: fix mouse cursor for panning
(cherry picked from commit 965dee4181
)
This commit is contained in:
parent
fd23cf7d02
commit
6e70893241
@ -18327,7 +18327,7 @@ begin
|
||||
begin
|
||||
// Only horizontal movement allowed.
|
||||
if X < FLastClickPos.X then
|
||||
Name := 'VT_MOVEW'
|
||||
NewCursor := crVT_MOVEW
|
||||
else
|
||||
NewCursor := crVT_MOVEE;
|
||||
end
|
||||
|
Loading…
Reference in New Issue
Block a user