Mega Code Archive

 

Categories / VB.Net / WPF

 

About Dialog with Tree Walking

<Window xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"   x:Class="AboutDialog" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"   Title="About WPF Unleashed" SizeToContent="WidthAndHeight"   Background="OrangeRed">   <StackPanel>   <Label FontWeight="Bold" FontSize="20" Foreground="White">     WPF   </Label>   <Label>License</Label>   <Label>Installed Dll:</Label>   <ListBox>       <ListBoxItem>1</ListBoxItem>       <ListBoxItem>2</ListBoxItem>       <ListBoxItem>3</ListBoxItem>       <ListBoxItem>4</ListBoxItem>       <ListBoxItem>5</ListBoxItem>       <ListBoxItem>6</ListBoxItem>       <ListBoxItem>7</ListBoxItem>       <ListBoxItem>8</ListBoxItem>       <ListBoxItem>9</ListBoxItem>   </ListBox>   <StackPanel Orientation="Horizontal" HorizontalAlignment="Center">     <Button MinWidth="75" Margin="10">Help</Button>     <Button MinWidth="75" Margin="10">OK</Button>   </StackPanel>   <StatusBar>text</StatusBar>   </StackPanel> </Window> //File:Window.xaml.vb Imports System Imports System.Diagnostics Imports System.Windows Imports System.Windows.Media Public Partial Class AboutDialog   Inherits Window   Public Sub New()     InitializeComponent()   End Sub   Protected Overrides Sub OnContentRendered(e As EventArgs)     MyBase.OnContentRendered(e)     PrintVisualTree(Me)   End Sub   Private Sub PrintVisualTree(obj As DependencyObject)     Debug.WriteLine(obj)     For i As Integer = 0 To VisualTreeHelper.GetChildrenCount(obj) - 1       PrintVisualTree(VisualTreeHelper.GetChild(obj, i))     Next   End Sub End Class