Controls - Drag and drop files from a listbox fails

Print Page | Close Window

Drag and drop files from a listbox fails

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Controls
Forum Description: Topics Related to Codejock Controls
URL: http://forum.codejock.com/forum_posts.asp?TID=19630
Printed Date: 27 November 2024 at 3:46pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Drag and drop files from a listbox fails

Posted By: ceesverburg
Subject: Drag and drop files from a listbox fails
Date Posted: 02 April 2012 at 9:12am

Drag and drop from listbox doesn't work, worse when I try to drop to windows explorer or to the desktop it causes explorer to crash. Checking de Data object after Data.SetData "c:\test.txt", vbCFFiles it seems that no files were added (Data Is Nothing). Code I use below. Did I miss something?

Private Sub lstFiles_OLEStartDrag(Data As XtremeSuiteControls.DataObject, AllowedEffects As Long)
    AllowedEffects = vbDropEffectCopy
    Data.SetData "c:\test.txt", vbCFFiles
    'OR: Data.SetData Array("c:\test.txt", "c:\test2.txt"), vbCFFiles
End Sub

VB6 SP6, Xtreme SuitePro ActiveX 2011 (15.2.1), Win7