OLEDropMode in Treeview hasn' an effect

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi there

I have a little Problem. I create an Usercontrol with a Xtreme Suite treeview. I have some Properties also a Property like: 

Public Property Get OLEDropMode() As XtremeSuiteControls.OLEDropConstants
    OLEDropMode = TreeView1.OLEDropMode
End Property

Public Property Let OLEDropMode(ByVal newOLEDropMode As XtremeSuiteControls.OLEDropConstants)
    TreeView1.OLEDropMode = newOLEDropMode
    PropertyChanged "OLEDropMode"
End Property

Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    TreeView1.OLEDropMode = PropBag.ReadProperty("OLEDropMode", XtremeSuiteControls.OLEDropConstants.xtpOLEDropNone)
 End Sub

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    Call PropBag.WriteProperty("OLEDropMode", TreeView1.OLEDropMode, XtremeSuiteControls.OLEDropConstants.xtpOLEDropNone)
End Sub

When I use my Control in a form, the OLEDropMode doesn�t take an effect. I need some help please

thx

p.s. also in the listview control

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
FrankM Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 28 June 2010 Location: Germany Status: Offline Points: 10	Post Options Post Reply Quote FrankM Report Post Thanks(0) Quote Reply Topic: OLEDropMode in Treeview hasn' an effect Posted: 02 July 2010 at 8:03am
	Hi there I have a little Problem. I create an Usercontrol with a Xtreme Suite treeview. I have some Properties also a Property like: Public Property Get OLEDropMode() As XtremeSuiteControls.OLEDropConstants OLEDropMode = TreeView1.OLEDropMode End Property Public Property Let OLEDropMode(ByVal newOLEDropMode As XtremeSuiteControls.OLEDropConstants) TreeView1.OLEDropMode = newOLEDropMode PropertyChanged "OLEDropMode" End Property Private Sub UserControl_ReadProperties(PropBag As PropertyBag) TreeView1.OLEDropMode = PropBag.ReadProperty("OLEDropMode", XtremeSuiteControls.OLEDropConstants.xtpOLEDropNone) End Sub Private Sub UserControl_WriteProperties(PropBag As PropertyBag) Call PropBag.WriteProperty("OLEDropMode", TreeView1.OLEDropMode, XtremeSuiteControls.OLEDropConstants.xtpOLEDropNone) End Sub When I use my Control in a form, the OLEDropMode doesn�t take an effect. I need some help please thx p.s. also in the listview control

FrankM Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 28 June 2010 Location: Germany Status: Offline Points: 10	Post Options Post Reply Quote FrankM Report Post Thanks(0) Quote Reply Posted: 14 July 2010 at 10:12am
	Hello Problem is solved. Message from Oleg >>Hello, >>Thanks, agree that problem. TreeView doesn't recrete self after OLEDropMode propety was changed - it was designed to be used only in designtime. >>As workaround you can update some propety that will recreate tree like HideSelection: >>Public Property Let OLEDropMode(ByVal newOLEDropMode As XtremeSuiteControls.OLEDropConstants) >> TreeView1.OLEDropMode = newOLEDropMode >> TreeView1.HideSelection = TreeView1.HideSelection >> PropertyChanged "OLEDropMode" >>End Property bye
	Product xtreme Suite 15.2.1 OS: Windows 7 64bit and Windows XP Prof SP 3