frmDragDrop - BUG?
Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Report Control
Forum Description: Topics Related to Codejock Report Control
URL: http://forum.codejock.com/forum_posts.asp?TID=18564
Printed Date: 27 November 2024 at 6:44pm Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com
Topic: frmDragDrop - BUG?
Posted By: Developerx
Subject: frmDragDrop - BUG?
Date Posted: 18 June 2011 at 5:56am
Hi,
In the latest v15 samples: ReportControl Sample - additional Samples -> Drag and Drop Test (frmDragDrop.frm)
The drag and drop works, but if you click on column then drag and drop do not work again?
This is the code (same as included in the latest package): http://www.codejock.com/support/articles/com/reportcontrol/rp_1.asp
Is this a bug, how to workaround it (i dont care about bug just workarounds) ; )
Regards Developerx
|
Replies:
Posted By: SuperMario
Date Posted: 20 June 2011 at 8:43am
Just set SortedDragDrop to True.
|
Posted By: Developerx
Date Posted: 22 June 2011 at 3:39pm
Thanks!!!
So simple i wonder why i did not figure it out, anyway i managed to use this workaround and used following.
Private sortx As Boolean
Private Sub ReportControl1_SortOrderChanged() sortx = True End Sub
Private Sub ReportControl1_OLEDragOver(ByVal Data As XtremeReportControl.DataObject, Effect As Long, ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single, ByVal state As Integer) If sortx = True Then refreshcol End Sub
Private Sub refreshcol() Me.ReportControl1.Columns.DeleteAll With ReportControl1.Columns .Add 0, "xx1", 500, True .Add 1, "xx2", 50, True .Add 2, "xx3", 40, True .Add 3, "xx4", 150, True End With sortx = False End Sub
i use the refreshcol when reportcontrol is grouped and the reportcontrol needs to get exported (i call it before exporting to textfile since it cant export if reportcontrol is in group mode.
regards Developerx
|
|