|
OLE Drag&Drop doesn't work |
Post Reply 
|
| Author | |
Fabian 
Senior Member 
Joined: 22 November 2004 Location: Switzerland Status: Offline Points: 336 |
 Post Options
 Thanks(0)
 Quote Reply
 Topic: OLE Drag&Drop doesn't workPosted: 02 March 2010 at 9:11am |
|
Hi,
I jumped to V13.3 (VB6/SP6, Win7). NoI run into problems with OLEDrag&Drop. What do I wrong:
RC.UnrestrictedDragDrop=True
RC.SortedDragDrop=True
RC.OLEDropMode=xtpOLEDropManual
RC.EnableDragDrop "DMXP", xtpReportAllowDrop
If I try to drag a file from the Windows explorer window to the RC I see only the 'no-drag' icon. The OLEDragOver event was never fired.
Any help???
|
|
|
Product: Xtreme SuitePro (ActiveX) version 16.2.3
Platform: Windows 7 (32bit) Language: Visual Basic 6.0 / SP6 |
|
 |
|
|
McKloony
Senior Member
Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
Quote Reply
Posted: 02 March 2010 at 9:28am |
|
Try: ReVal = RC.EnableDragDrop("DMXP", xtpReportAllowDrag + xtpReportAllowDrop)
|
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
|
|
|
Fabian
Senior Member
Joined: 22 November 2004 Location: Switzerland Status: Offline Points: 336 |
Post Options
Thanks(0)
Quote Reply
Posted: 02 March 2010 at 9:53am |
|
Thanks McKloony,
But that doesn't change anything.
|
|
|
Product: Xtreme SuitePro (ActiveX) version 16.2.3
Platform: Windows 7 (32bit) Language: Visual Basic 6.0 / SP6 |
|
|
|
|
Oleg
Senior Member
Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
Quote Reply
Posted: 02 March 2010 at 2:47pm |
Hi, do you have x64 Machine ?
|
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
|
|
|
Oleg
Senior Member
Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
Quote Reply
Posted: 02 March 2010 at 3:11pm |
|
Can you chec if standard ListBox works for you - just create new project, drop ListBox and code
Private Sub Form_Load() List1.OLEDropMode = vbOLEDropManual End Sub Private Sub List1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer) Debug.Print "List1_OLEDragOver" End Sub |
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
|
|
|
SuperMario
Senior Member
Joined: 14 February 2004 Status: Offline Points: 18057 |
Post Options
Thanks(0)
Quote Reply
Posted: 02 March 2010 at 3:23pm |
|
This might be caused by User Account Control trying to protect you from
messages being sent between processes with different privileges. This
can happen if the application you are dragging to is being "Run as
Administrator." You can read more about this issue here (Windows 7 – User Account Control (UAC) – Drag n’ Drop - Issuesl.)
|
|
|
|
|
Post Reply
|
|
Tweet
|
| Forum Jump | Forum Permissions You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |
Topic Options
Fabian wrote: