Mini Kabibi Habibi

Current Path : C:/Users/Public/Documents/DXperience 13.1 Demos/WPF/VB/DockingDemo.Wpf/Modules/
Upload File :
Current File : C:/Users/Public/Documents/DXperience 13.1 Demos/WPF/VB/DockingDemo.Wpf/Modules/LayoutGroups.xaml.vb

Imports Microsoft.VisualBasic
Imports System

Namespace DockingDemo
	Partial Public Class LayoutGroups
		Inherits DockingDemoModule
		Public Sub New()
			InitializeComponent()
			AddHandler SizeChanged, AddressOf LayoutGroups_SizeChanged
		End Sub
		Private Sub LayoutGroups_SizeChanged(ByVal sender As Object, ByVal e As System.Windows.SizeChangedEventArgs)
			If e.NewSize.Height < 500 Then
				layoutGroup2.Visibility = System.Windows.Visibility.Collapsed
				layoutGroup3.Visibility = System.Windows.Visibility.Collapsed
			Else
				layoutGroup2.Visibility = System.Windows.Visibility.Visible
				layoutGroup3.Visibility = System.Windows.Visibility.Visible
			End If
		End Sub
		Public Overrides ReadOnly Property SupportTouchThemes() As Boolean
			Get
				Return False
			End Get
		End Property
	End Class
End Namespace