Create Collection based Resource for data binding : ObservableCollection « Windows Presentation Foundation « VB.Net

Home
VB.Net
1.2D
2.Application
3.Class
4.Data Structure
5.Data Types
6.Database ADO.net
7.Development
8.Event
9.File Directory
10.Generics
11.GUI
12.Language Basics
13.LINQ
14.Network Remote
15.Security
16.Thread
17.Windows Presentation Foundation
18.Windows System
19.XML
20.XML LINQ
VB.Net Tutorial
VB.Net by API
VB.Net » Windows Presentation Foundation » ObservableCollectionScreenshots 
Create Collection based Resource for data binding
Create Collection based Resource for data binding
    

<Window 
    x:Class="WpfApplication1.Window1"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    xmlns:local="clr-namespace:WpfApplication1"
    Title="WPF" Height="300" Width="180">

    <Window.Resources>
        <local:SortableCountries x:Key="sortableCountries"/>
    </Window.Resources>
    <Grid>
        <StackPanel>
            <ItemsControl ItemsSource="{StaticResource sortableCountries}" />
            <Button Click="SortButton_Click" Content="Sort" Margin="8" />
        </StackPanel>

    </Grid>

</Window>

//File:Window.xaml.vb

Imports System
Imports System.Collections
Imports System.Windows
Imports System.Windows.Data
Imports System.Collections.ObjectModel

Namespace WpfApplication1
  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()
    End Sub

    Private Sub SortButton_Click(sender As Object, args As RoutedEventArgs)
      Dim sortableCountries As SortableCountries = DirectCast(Me.Resources("sortableCountries"), SortableCountries)

      Dim lcv As ListCollectionView = DirectCast(CollectionViewSource.GetDefaultView(sortableCountries), ListCollectionView)

      lcv.CustomSort = New SortCountries()
    End Sub
  End Class

  Public Class SortCountries
    Implements IComparer
    Public Function Compare(As Object, y As ObjectAs Integer Implements IComparer.Compare
      Dim stringX As String = x.ToString()
      Dim stringY As String = y.ToString()

      Return stringX.CompareTo(stringY)

    End Function
  End Class

  Public Class SortableCountries
    Inherits ObservableCollection(Of String)
    Public Sub New()
      Me.Add("C")
      Me.Add("B")
      Me.Add("A")
    End Sub
  End Class
End Namespace

   
    
    
    
  
Related examples in the same category
1.Bind to ObservableCollectionBind to ObservableCollection
2.Use ObservableCollection as ResourceUse ObservableCollection as Resource
3.Bind to ObservableCollection and ItemsSourceBind to ObservableCollection and ItemsSource
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.