'宣言 Public ReadOnly Property Pane As DockableControlPane
public DockableControlPane Pane {get;}
Imports Infragistics.Shared Imports Infragistics.Win Imports Infragistics.Win.UltraWinDock Private Sub ultraDockManager1_BeforeShowFlyout(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinDock.CancelableControlPaneEventArgs) Handles ultraDockManager1.BeforeShowFlyout ' BeforeShowFlyout is fired before an unpinned control pane is ' displayed in a flyout window. ' ' Prevent flyouts docked to the top or bottom from flying out - ' get the associated DockArea and base it on its docked location Dim location As DockedLocation = e.Pane.DockAreaPane.DockedLocation If (location = DockedLocation.DockedBottom OrElse _ location = DockedLocation.DockedTop) Then e.Cancel = True End If End Sub
using Infragistics.Shared; using Infragistics.Win; using Infragistics.Win.UltraWinDock; using System.Diagnostics; private void ultraDockManager1_BeforeShowFlyout(object sender, Infragistics.Win.UltraWinDock.CancelableControlPaneEventArgs e) { // BeforeShowFlyout is fired before an unpinned control pane is // displayed in a flyout window. // // Prevent flyouts docked to the top or bottom from flying out - // get the associated DockArea and base it on its docked location DockedLocation location = e.Pane.DockAreaPane.DockedLocation; if (location == DockedLocation.DockedBottom || location == DockedLocation.DockedTop) e.Cancel = true; }