Traduction▲
Ce tutoriel est la traduction la plus fidèle possible du tutoriel original de Peter Bull, Microsoft Silverlight 4 - Expander Custom Control in Silverlight.
Introduction▲
Expander Control est un panneau repliable qui, lorsqu'il est réduit, n'affiche que la légende et le bouton, puis affiche son contenu quand il est déplié.
Contrôle Expander personnalisé en Silverlight▲
Étape 1▲
Démarrez Microsoft Visual Web Developer 2010 Express, ensuite sélectionnez Fichier puis Nouveau Projet... Sélectionnez Visual Basic ensuite Application Silverlight dans les modèles installés, sélectionnez un emplacement si vous le souhaitez, puis entrez un nom pour le projet et appuyez sur OK :
Étape 2▲
Une nouvelle fenêtre Nouvelle application Silverlight devrait apparaître, décochez la case Héberger l'application Silverlight sur un nouveau site Web, puis sélectionnez la Version de Silverlight ciblée :
Étape 3▲
Une page vierge nommée MainPage.xaml devrait alors apparaître :
Étape 4▲
Sélectionnez Fichier puis Ajouter depuis le menu principal, puis Nouveau Projet… La fenêtre Nouveau Projet devrait apparaître, sélectionnez Bibliothèque de classes Silverlight puis saisissezle Nom « Expander » :
Étape 5▲
Dans « Sélectionnez la version de Silverlight à cibler dans la liste des Kits de développement Silverlight SDK installés » choisissez la même version de Silverlight, par exemple Silverlight 4, et cliquez sur OK.
Puis dans l'Explorateur de solutions pour Expander, cliquez sur Class1.vb, ensuite allez dans Propriétés et modifiez le Nom de fichier en Expander.vb :
Étape 6▲
Dans « Vous renommez un fichier. Voulez-vous également renommer dans ce projet toutes les références à l'élément de code 'Class1' ? », choisissez Oui.
Faites un clic droit sur le projet Expander (et non sur Expander.vb) dans l'Explorateur de solutions et choisissez Ajouter puis Nouveau dossier, et nommez-le « Themes » (sans les guillemets) :
Étape 7▲
Faites un clic droit sur le dossier « Themes » du projet Expander, et choisissez Ajouter, puis Nouvel élément…, sélectionnez Dictionnaire de ressources Silverlight avec le nom Generic.xaml :
Étape 8▲
Dans le volet XAML de Generic.xaml, dans la balise ResourceDictionary, tapez le code XAML namespace suivant :
xmlns:local="clr-namespace:Expander"
Étape 9▲
En étant toujours dans le volet XAML de Generic.xaml, au-dessus de la balise </ResourceDictionary> et en dessous de la balise <ResourceDictionary>, tapez le code XAML suivant :
<Style TargetType="local:Expander">
<Setter Property="Template">
<Setter.Value>
<ControlTemplate TargetType="local:Expander">
<Grid>
<VisualStateManager.VisualStateGroups>
<VisualStateGroup x:Name="ViewStates">
<VisualStateGroup.Transitions>
<VisualTransition GeneratedDuration="0:0:0.5"/>
</VisualStateGroup.Transitions>
<VisualState x:Name="Expanded">
<Storyboard>
<DoubleAnimation Storyboard.TargetName="ContentScaleTransform"
Storyboard.TargetProperty="ScaleY" To="1" Duration="0"/>
<DoubleAnimation Storyboard.TargetName="RotateButtonTransform"
Storyboard.TargetProperty="Angle" To="180" Duration="0"/>
</Storyboard>
</VisualState>
<VisualState x:Name="Collapsed">
<Storyboard>
<DoubleAnimation Storyboard.TargetName="ContentScaleTransform"
Storyboard.TargetProperty="ScaleY" To="0" Duration="0"/>
<DoubleAnimation Storyboard.TargetName="RotateButtonTransform"
Storyboard.TargetProperty="Angle" To="0" Duration="0"/>
</Storyboard>
</VisualState>
</VisualStateGroup>
</VisualStateManager.VisualStateGroups>
<Border BorderBrush="{TemplateBinding BorderBrush}"
BorderThickness="{TemplateBinding BorderThickness}"
CornerRadius="{TemplateBinding CornerRadius}"
Background="{TemplateBinding Background}">
<Grid>
<Grid.RowDefinitions>
<RowDefinition Height="Auto"/>
<RowDefinition Height="Auto"/>
</Grid.RowDefinitions>
<Grid Margin="3">
<Grid.ColumnDefinitions>
<ColumnDefinition Width="Auto"/>
<ColumnDefinition Width="Auto"/>
</Grid.ColumnDefinitions>
<ContentPresenter Margin="3" Content="{TemplateBinding HeaderContent}"/>
<ToggleButton Grid.Column="1" RenderTransformOrigin="0.5,0.5" Margin="3" x:Name="ExpandCollapseButton">
<ToggleButton.Template>
<ControlTemplate>
<Grid>
<Ellipse Width="20" Height="20" Stroke="#FFA9A9A9" Fill="AliceBlue"/>
<Path RenderTransformOrigin="0.5,0.5" HorizontalAlignment="Center" VerticalAlignment="Center"
Data="M1,1.5L4.5,5 8,1.5" Stroke="#FF666666" StrokeThickness="2"/>
</Grid>
</ControlTemplate>
</ToggleButton.Template>
<ToggleButton.RenderTransform>
<RotateTransform x:Name="RotateButtonTransform"/>
</ToggleButton.RenderTransform>
</ToggleButton>
</Grid>
<ContentPresenter Grid.Row="1" Margin="5" Content="{TemplateBinding Content}" x:Name="Content">
<ContentPresenter.RenderTransform>
<ScaleTransform x:Name="ContentScaleTransform"/>
</ContentPresenter.RenderTransform>
</ContentPresenter>
</Grid>
</Border>
</Grid>
</ControlTemplate>
</Setter.Value>
</Setter>
</Style>
Étape 10▲
Double-cliquez sur la classe Expander.vb dans l'Explorateur de solutions du projet Expander.
Dans la vue de code pour Expander, au-dessus de la ligne Public Class Expander, tapez le code suivant :
Imports System.Windows.Controls.Primitives
<TemplateVisualState(Name:="Collapsed", GroupName:="ViewStates"),
TemplateVisualState(Name:="Expanded", GroupName:="ViewStates"),
TemplatePart(Name:="Content", Type:=GetType(FrameworkElement)),
TemplatePart(Name:="ExpandCollapseButton", Type:=GetType(ToggleButton))>
Étape 11▲
Puisque nous en sommes à la vue de code pour Expander.vb, en dessous de la ligne Public Class Expander, tapez le code suivant :
Inherits ContentControl
Private _useTransitions As Boolean = True
Private _collapsedState As VisualState
Private _toggleExpander As ToggleButton
Private _contentElement As FrameworkElement
Étape 12▲
Toujours dans la vue de code pour Expander.vb, au-dessus du End Class pour Public Class Expander, tapez les propriétés de dépendance suivantes :
Public Shared ReadOnly HeaderContentProperty As DependencyProperty =
DependencyProperty.Register("HeaderContent", GetType(Object),
GetType(Expander), Nothing)
Public Shared ReadOnly IsExpandedProperty As DependencyProperty =
DependencyProperty.Register("IsExpanded", GetType(Boolean),
GetType(Expander), New PropertyMetadata(True))
Public Shared ReadOnly CornerRadiusProperty As DependencyProperty =
DependencyProperty.Register("CornerRadius", GetType(CornerRadius),
GetType(Expander), Nothing)
Étape 13▲
Puisque nous en sommes toujours à la vue de code pour Expander.vb, au-dessus du End Class pour Public Class Expander, tapez les propriétés suivantes :
Public Property HeaderContent() As Object
Get
Return GetValue(HeaderContentProperty)
End Get
Set(ByVal value As Object)
SetValue(HeaderContentProperty, value)
End Set
End Property
Public Property IsExpanded() As Boolean
Get
Return CBool(GetValue(IsExpandedProperty))
End Get
Set(ByVal value As Boolean)
SetValue(IsExpandedProperty, value)
End Set
End Property
Public Property CornerRadius() As CornerRadius
Get
Return CType(GetValue(CornerRadiusProperty), CornerRadius)
End Get
Set(ByVal value As CornerRadius)
SetValue(CornerRadiusProperty, value)
End Set
End Property
Étape 14▲
En étant toujours dans la vue de code pour Expander.vb, au-dessus du End Class pour Public Class Expander, tapez le constructeur et le Sub suivants :
Public Sub New()
DefaultStyleKey = GetType(Expander)
End Sub
Private Sub ChangeVisualState(ByVal useTransitions As Boolean)
If IsExpanded Then
If _contentElement IsNot Nothing Then
_contentElement.Visibility = Visibility.Visible
End If
VisualStateManager.GoToState(Me, "Expanded", useTransitions)
Else
VisualStateManager.GoToState(Me, "Collapsed", useTransitions)
_collapsedState = TryCast(GetTemplateChild("Collapsed"), VisualState)
If _collapsedState Is Nothing Then
If _contentElement IsNot Nothing Then
_contentElement.Visibility = Visibility.Collapsed
End If
End If
End If
End Sub
Étape 15▲
Encore une fois, en étant toujours dans la vue de code pour Expander.vb, au-dessus du End Class pour Public Class Expander, tapez les gestionnaires d'événements suivants :
Private Sub Toggle_Click(ByVal sender As Object, ByVal e As RoutedEventArgs)
IsExpanded = Not IsExpanded
_toggleExpander.IsChecked = IsExpanded
ChangeVisualState(_useTransitions)
End Sub
Private Sub Collapsed_Completed(ByVal sender As Object, ByVal e As EventArgs)
_contentElement.Visibility = Visibility.Collapsed
End Sub
Public Overrides Sub OnApplyTemplate()
MyBase.OnApplyTemplate()
_toggleExpander = TryCast(GetTemplateChild("ExpandCollapseButton"), ToggleButton)
If _toggleExpander IsNot Nothing Then
AddHandler _toggleExpander.Click, AddressOf Toggle_Click
End If
_contentElement = TryCast(GetTemplateChild("Content"), FrameworkElement)
If _contentElement IsNot Nothing Then
_collapsedState = TryCast(GetTemplateChild("Collapsed"), VisualState)
If (_collapsedState IsNot Nothing) AndAlso (_collapsedState.Storyboard IsNot Nothing) Then
AddHandler _collapsedState.Storyboard.Completed, AddressOf Collapsed_Completed
End If
End If
ChangeVisualState(False)
End Sub
Étape 16▲
Sélectionnez Debug, puis l'option Build Expander du menu :
Étape 17▲
Retournez au concepteur de vues de MainPage.xaml en sélectionnant l'onglet MainPage.xaml, ou double-cliquez sur MainPage.xaml dans l'Explorateur de solutions pour le projet principal.
Puis dans la section Tous les contrôles Silverlight de la Boîte à outils, sélectionnez le contrôle Canvas :
Étape 18▲
Dessinez un Canvas qui remplit toute la page ou dans le volet XAML entre les lignes <Grid> et </Grid>,tapez le code XAML suivant :
<Canvas Height="300" Width="400" HorizontalAlignment="Left" VerticalAlignment="Top" Name="Page">
</Canvas>Voir ci-dessous :
Étape 19▲
Puis dans la section Contrôles Expander de la Boîte à outils, sélectionnez le contrôle Expander :
Étape 20▲
Dessinez un Expander sur la page (Canvas) en le glissant de la Boîte à outils sur le Canvas, ensuite dans le volet XAML, entre les balises <Canvas> et </Canvas>, modifiez le code XAML my:Expander comme ceci :
<my:Expander Canvas.Left="75" Canvas.Top="25" Height="250" Width="250" HeaderContent="Expander">
<my:Expander.Content>
<StackPanel>
<Button Margin="4" Padding="4" Content="Button One"/>
<Button Margin="4" Padding="4" Content="Button Two"/>
<Button Margin="4" Padding="4" Content="Button Three"/>
<Button Margin="4" Padding="4" Content="Button Four"/>
</StackPanel>
</my:Expander.Content>
</my:Expander>Voir ci-dessous :
Étape 21▲
Enregistrez le projet maintenant que vous avez terminé l'application Silverlight. Sélectionnez Debug puis Démarrer le débogage ou cliquez sur Démarrer le débogage :
Une fois que vous l'aurez fait, ce qui suit apparaîtra dans une nouvelle fenêtre du navigateur :
Étape 22▲
Cliquez sur le bouton rond avec la flèche pour plier ou déplier l'Expander :
Étape 23▲
Fermez l'application et la fenêtre du navigateur en cliquant sur le bouton Fermer 
en haut à droite de la fenêtre de l'application et du navigateur Web pour Arrêter l'application.
Conclusion▲
Ceci est un exemple simple de comment créer un Expander, il peut être étendu pour prendre en charge davantage de propriétés telles que la couleur de fond d'un HeaderContent par exemple. Essayez d'ajouter des fonctionnalités supplémentaires à votre Expander puis personnalisez-le !
Liens▲
Remerciements▲
Je tiens ici à remercier Peter Bull de m'avoir autorisé à traduire son tutoriel.
Je remercie tomlev pour sa relecture technique et ses propositions.
Je remercie également f-leb pour sa relecture orthographique et ses propositions.
