Imports System.Diagnostics Imports Infragistics.Win Imports Infragistics.Win.UltraWinExplorerBar Private Sub ultraExplorerBar1_GroupDragOver(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinExplorerBar.GroupDragOverEventArgs) Handles ultraExplorerBar1.GroupDragOver Dim beforeAfter As String If (e.TargetGroupRelativePosition = GroupDropPosition.After) Then beforeAfter = "after" Else beforeAfter = "before" End If Debug.WriteLine(String.Format("The group '{0}' is being dragged " + beforeAfter + " group '{1}'", e.Group.Text, e.TargetGroup)) Debug.WriteLine(String.Format("The group is currently over point: ", New Point(e.X, e.Y).ToString())) ' Don't allow the Group to be dropped if the target group has a key of "System" If e.TargetGroup.Key = "System" Then e.AllowDrop = False e.DragCursor = Cursors.No End If End Sub
using System.Diagnostics; using Infragistics.Win; using Infragistics.Win.UltraWinExplorerBar; private void ultraExplorerBar1_GroupDragOver(object sender, Infragistics.Win.UltraWinExplorerBar.GroupDragOverEventArgs e) { string beforeAfter = (e.TargetGroupRelativePosition == GroupDropPosition.After) ? "after" : "before"; Debug.WriteLine(string.Format("The group '{0}' is being dragged " + beforeAfter + " group '{1}'", e.Group.Text, e.TargetGroup)); Debug.WriteLine(string.Format("The group is currently over point: ", new Point(e.X, e.Y).ToString())); // Don't allow the Group to be dropped if the target group has a key of "System" if (e.TargetGroup.Key == "System") { e.AllowDrop = false; e.DragCursor = Cursors.No; } }
Target Platforms: Windows 10, Windows 8.1, Windows 8, Windows 7, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2