View Issue Details

IDProjectCategoryView StatusLast Update
0001383Double CommanderGraphical user interfacepublic2020-11-30 07:43
Reportercordylus Assigned ToAlexx2000  
PrioritynormalSeverityminorReproducibilityalways
Status closedResolutionfixed 
ProjectionnoneETAnone 
OS VersionWindows XP 
Target Version0.8.0Fixed in Version0.8.0 
Summary0001383: Drag-n-Drop: Не меняется курсор мыши при зажатии/отпускании Shift, если не двигать курсор
DescriptionЕсли при этом один раз нажать Alt, то дальше на Shift реагирует нормально, хотя при этом используются уже системные курсоры (Почему бы не использовать их вообще всегда? Или хотя бы сделать такую опцию в настройках)
TagsNo tags attached.
Attached Files
ufileviewwithmainctrl.pas.patch (530 bytes)   
Index: src/fileviews/ufileviewwithmainctrl.pas
===================================================================
--- src/fileviews/ufileviewwithmainctrl.pas	(revision 7565)
+++ src/fileviews/ufileviewwithmainctrl.pas	(working copy)
@@ -1120,6 +1120,8 @@
         TControlHandlersHack(MainControl).DragCursor:= crArrowCopy
       else
         TControlHandlersHack(MainControl).DragCursor:= crDrag;
+
+      DragManager.DragMove(Mouse.CursorPos);
     end
   else
     TControlHandlersHack(MainControl).DragCursor:= crDrag;
Fixed in Revision7566
Operating system
Widgetset
Architecture

Activities

cordylus

2017-05-16 06:25

developer   ~0002228

Добавил патч. В идеале это должно обрабатываться в TDragManager, но, насколько я понял, задать свой DragManager нельзя (по крайней мере в LCL 1.6.4), а TDragManagerDefault.KeyDown обрабатывает только Control, поэтому так.

Issue History

Date Modified Username Field Change
2016-05-21 17:18 cordylus New Issue
2017-05-16 06:16 cordylus File Added: ufileviewwithmainctrl.pas.patch
2017-05-16 06:25 cordylus Note Added: 0002228
2017-05-16 12:40 Alexx2000 Status new => acknowledged
2017-05-16 12:40 Alexx2000 Target Version => 0.8.0
2017-05-17 22:31 Alexx2000 Fixed in Revision => 7566
2017-05-17 22:31 Alexx2000 Status acknowledged => resolved
2017-05-17 22:31 Alexx2000 Fixed in Version => 0.8.0
2017-05-17 22:31 Alexx2000 Resolution open => fixed
2017-05-17 22:31 Alexx2000 Assigned To => Alexx2000
2020-11-30 07:43 Alexx2000 Status resolved => closed