Project JEDI - Issue Tracker
Mantis Bugtracker

Viewing Issue Simple Details Jump to Notes ] View Advanced ] Issue History ] Print ]
ID Category Severity Reproducibility Date Submitted Last Update
0006631 [JEDI VCL] 00 JVCL Components minor always 2018-03-31 09:18 2018-03-31 09:18
Reporter nyburner View Status public  
Assigned To
Priority normal Resolution open  
Status new   Product Version Daily / GIT
Summary 0006631: Drag and Drop
Description Drag and drop for the TjvDragDrop component will not work under Windows 10
unless the EXE is run as privileged user -AND- some extra code is run to enable
messages to be passed correctly. See attached code unit below;

Suggestion: add the code included below to JVCL so drag and drop functions
             correctly;

Thanks;

Bruce
Additional Information {***********************************************************************
* *
* wsUpdateDragDropPrivileges.pas *
* *
* *
* Modification *
* ============ *
* *
***********************************************************************}

Unit wsUpdateDragDropPrivileges ;

interface

  Procedure UpdateDragDropPrivileges ;

Implementation
  Uses
    Windows , Messages ;

// function ChangeWindowMessageFilter(Message: UINT; dwFlag: DWORD): BOOL; stdcall;

{***********************************************************************
* *
* UpdateDragDropPrivileges *
* *
* Modification *
* ============ *
* *
***********************************************************************}

Procedure UpdateDragDropPrivileges ;
  Begin { UpdateDragDropPrivileges }
    ChangeWindowMessageFilter(WM_DROPFILES , MSGFLT_ADD) ;
    ChangeWindowMessageFilter(WM_COPYDATA , MSGFLT_ADD) ;
    ChangeWindowMessageFilter(WM_COPYGLOBALDATA , MSGFLT_ADD) ;
  End ; { UpdateDragDropPrivileges }

Initialization
  UpdateDragDropPrivileges ;
End.
Tags No tags attached.
Attached Files ? file icon wsUpdateDragDropPrivileges.pas [^] (1,857 bytes) 2018-03-31 09:18

- Relationships

There are no notes attached to this issue.

- Issue History
Date Modified Username Field Change
2018-03-31 09:18 nyburner New Issue
2018-03-31 09:18 nyburner File Added: wsUpdateDragDropPrivileges.pas


Mantis 1.1.6[^]
Copyright © 2000 - 2008 Mantis Group
Powered by Mantis Bugtracker