mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 00:39:44 +02:00
VirtualTreeView: fix mouse cursor for panning
This commit is contained in:
parent
dfa66431c4
commit
965dee4181
@ -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