Microsoft Silverlight 4 - Tutoriel 23 : Doodle Pad

Logiciel de dessin basique en utilisant InkPresenter

Ce tutoriel fait partie d'une série de niveau débutant-intermédiaire pour apprendre Silverlight 4 par le biais d'exemples pas à pas.

Langage : VB.NET

Public visé : niveau Débutant

Commentez ce tutoriel : Commentez

Article lu fois.

Les trois auteurs et traducteur

Peter Bull

Deepin Prayag (Traduction)

Traducteur : Deepin

L'article

Publié le 23 mars 2012 - Mis à jour le 24 avril 2012

Version PDF Version hors-ligne

ePub, Azw et Mobi

Liens sociaux

Traduction▲

Ce tutoriel est la traduction la plus fidèle possible du tutoriel original de Peter Bull, Microsoft Silverlight 4 - Basic Drawing Package using InkPresenter.

Introduction▲

Doodle Pad utilise la fonctionnalité InkPresenter de Silverlight incluant la définition de la taille et de la couleur, ainsi que la prise en charge des fonctions pour ouvrir et enregistrer.

Logiciel de dessin basique en utilisant InkPresenter▲

É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 Projet, puis Ajouter une référence… La fenêtre Ajouter une référence devrait apparaître, sélectionnez System.Xml.Linq dans la liste .NET :

Étape 5▲

Ajoutez la référence à System.Xml.Linq en cliquant sur OK.

Puis dans la section Tous les contrôles Silverlight de la Boîte à outils, sélectionnez le contrôle Canvas :

Étape 6▲

Dessinez un Canvas sur la page, ensuite dans le volet XAML au-dessus de </Grid> modifiez la ligne Canvas1 comme ceci :

Sélectionnez

<Canvas Height="65" Width="400" VerticalAlignment="Top" HorizontalAlignment="Left" Name="Toolbar"></Canvas>

Voir ci-dessous :

Étape 7▲

Puis dans la section Contrôles Silverlight communs de la Boîte à outils, sélectionnez le contrôle Button :

Étape 8▲

Dessinez trois boutons sur la barre d'outils du Canvas en glissant les boutons de la Boîte à outils sur le Canvas, ensuite dans le volet XAML entre les balises <Canvas> et </Canvas>, modifiez les lignes <Button> comme ceci :

Sélectionnez

<Button Canvas.Left="6" Canvas.Top="6" Height="23" Width="75" Name="New" Content="New"/>
<Button Canvas.Left="87" Canvas.Top="6" Height="23" Width="75" Name="Open" Content="Open..."/>
<Button Canvas.Left="168" Canvas.Top="6" Height="23" Width="75" Name="Save" Content="Save..."/>

Voir ci-dessous :

Étape 9▲

Puisque nous en sommes au volet XAML, en dessous de la dernière balise <Button> et au-dessus de </Canvas>, tapez le code ComboBox XAML suivant :

Sélectionnez

<ComboBox Canvas.Left="6" Canvas.Top="35" Height="23" Width="156" Name="Size">
  <ComboBoxItem Tag="1">
    <Rectangle Height="1" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="2">
    <Rectangle Height="2" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="5" IsSelected="True">
    <Rectangle Height="5" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="10">
    <Rectangle Height="10" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="15">
    <Rectangle Height="15" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="20">
    <Rectangle Height="20" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="25">
    <Rectangle Height="25" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="30">
    <Rectangle Height="30" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="40">
    <Rectangle Height="40" Width="150" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="50">
    <Rectangle Height="50" Width="150" Fill="Black"/>
  </ComboBoxItem>
</ComboBox>

<ComboBox Canvas.Left="168" Canvas.Top="35" Height="23" Width="75" Name="Colour">
  <ComboBoxItem Tag="FF000000" IsSelected="True">
    <Rectangle Width="25" Height="14" Fill="Black"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FF808080">
    <Rectangle Width="25" Height="14" Fill="Gray"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FFFF0000">
    <Rectangle Width="25" Height="14" Fill="Red"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FFFFA500">
    <Rectangle Width="25" Height="14" Fill="Orange"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FFFFFF00">
    <Rectangle Width="25" Height="14" Fill="Yellow"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FF008000">
    <Rectangle Width="25" Height="14" Fill="Green"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FF00FFFF">
    <Rectangle Width="25" Height="14" Fill="Cyan"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FF0000FF">
    <Rectangle Width="25" Height="14" Fill="Blue"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FFFF00FF">
    <Rectangle Width="25" Height="14" Fill="Magenta"/>
  </ComboBoxItem>
  <ComboBoxItem Tag="FF800080">
    <Rectangle Width="25" Height="14" Fill="Purple"/>
  </ComboBoxItem>
</ComboBox>

Voir ci-dessous :

Étape 10▲

Encore une fois étant toujours dans le volet XAML, en dessous de </Canvas> et au-dessus de la balise </Grid>, tapez le code InkPresenter XAML suivant :

Sélectionnez

<InkPresenter Height="236" Width="400" Margin="0,64,0,0" HorizontalAlignment="Left" VerticalAlignment="Top" 
Background="White" Name="Surface"/>

Voir ci-dessous :

Étape 11▲

Faites un clic droit sur la page ou sur l'entrée de MainPage.xaml dans l'Explorateur de solutions et choisissez l'option Afficher le code. Dans la vue de code, au-dessus de la ligne Partial Public Class MainPage, tapez le code suivant :

Sélectionnez

Imports System.Globalization.NumberStyles
Imports System.Xml.Linq

Étape 12▲

Pendant que nous en sommes à la vue de code de MainPage.xaml, en dessous de la ligne Inherits UserControl, tapez le code suivant :

Sélectionnez

Public drawStroke As Stroke
Public drawColour As Color = Colors.Black
Public drawSize As Size = New Size With {.Height = 5, .Width = 5}

Étape 13▲

En étant toujours dans la vue de code de MainPage.xaml, en dessous du End Sub pour le constructeur Public Sub New(), tapez le Sub suivant :

Sélectionnez

Private Sub Read(ByRef Stream As IO.Stream, ByRef Strokes As StrokeCollection)
  Dim _stroke As New Stroke
  Dim _drawAttr As New DrawingAttributes
  Dim _doc As XDocument = XDocument.Load(Stream)
  For Each Element As XElement In _doc.Root.<Stroke>
    For Each Item As XElement In Element.<Stroke.DrawingAttributes>.<DrawingAttributes>
      _drawAttr = New DrawingAttributes With {
      .Color = Color.FromArgb(
        Byte.Parse(Item.@Color.Substring(1, 2), HexNumber),
        Byte.Parse(Item.@Color.Substring(3, 2), HexNumber),
        Byte.Parse(Item.@Color.Substring(5, 2), HexNumber),
        Byte.Parse(Item.@Color.Substring(7, 2), HexNumber)),
      .Width = Item.@Width,
      .Height = Item.@Height}
    Next
    For Each Item As XElement In Element.<Stroke.StylusPoints>
      _stroke = New Stroke
      _stroke.DrawingAttributes = _drawAttr
      For Each Point As XElement In Item.<StylusPoint>
        _stroke.StylusPoints.Add(New StylusPoint With {
          .X = Point.@X,
          .Y = Point.@Y})
      Next
      Strokes.Add(_stroke)
    Next
  Next
End Sub

Étape 14▲

Puisque nous en sommes toujours à la vue de code de MainPage.xaml, en dessous du End Sub pour Private Sub Read(), tapez la fonction suivante :

Sélectionnez

Private Function Write(ByRef Strokes As StrokeCollection) As String
  Dim _doc As XDocument =
    <?xml version="1.0" encoding="utf-8"?>
    <StrokeCollection>
      <%= From Item As Stroke In Strokes Select
        <Stroke>
          <Stroke.DrawingAttributes>
            <DrawingAttributes
              Color=<%= Item.DrawingAttributes.Color %>
              Width=<%= Item.DrawingAttributes.Width %>
              Height=<%= Item.DrawingAttributes.Height %>
            />
          </Stroke.DrawingAttributes>
          <Stroke.StylusPoints>
            <%= From Point As StylusPoint In Item.StylusPoints Select
              <StylusPoint
              X=<%= Point.X %>
              Y=<%= Point.Y %>
              />
            %>
          </Stroke.StylusPoints>
        </Stroke>
      %>
    </StrokeCollection>
  Return _doc.ToString
End Function

Étape 15▲

Retournez dans le concepteur de vues en sélectionnant l'onglet MainPage.xaml, ou faites un clic droit sur la page ou sur l'entrée de MainPage.xaml dans l'Explorateur de solutions et choisissez l'option Concepteur de vues.

Cliquez sur la Surface InkPresenter, ensuite allez dans la boîte Propriétés et cliquez sur l'onglet Événements :

Double-cliquez sur l'événement MouseLeftButtonDown et tapez ceci dans le Sub Surface_MouseLeftButtonDown :

Sélectionnez

drawStroke = New Stroke
drawStroke.DrawingAttributes.Color = drawColour
drawStroke.DrawingAttributes.Width = drawSize.Width
drawStroke.DrawingAttributes.Height = drawSize.Height
drawStroke.StylusPoints.Add(New StylusPoint With {
  .X = e.GetPosition(Surface).X,
  .Y = e.GetPosition(Surface).Y})
Surface.Strokes.Add(drawStroke)

Étape 16▲

Retournez au concepteur de vues en sélectionnant l'onglet MainPage.xaml, ou faites un clic droit sur la page ou sur l'entrée de MainPage.xaml dans l'Explorateur de solutions et choisissez l'option Concepteur de vues.

Cliquez sur la Surface InkPresenter, ensuite allez dans la boîte Propriétés et cliquez sur l'onglet Événements :

Double-cliquez sur l'événement MouseLeftButtonUp et tapez ceci dans le Sub Surface_MouseLeftButtonUp :

Sélectionnez

drawStroke = Nothing

Étape 17▲

Cliquez sur la Surface InkPresenter, ensuite allez dans la boîte Propriétés et cliquez sur l'onglet Événements :

Double-cliquez sur l'événement MouseMove et tapez ceci dans le Sub Surface_MouseMove :

Sélectionnez

If Not drawStroke Is Nothing Then
  drawStroke.StylusPoints.Add(New StylusPoint With {
    .X = e.GetPosition(Surface).X,
    .Y = e.GetPosition(Surface).Y})
End If

Étape 18▲

Double-cliquez sur le bouton « New » et tapez ceci dans le Sub New_Click :

Sélectionnez

If MessageBox.Show("Start a New Doodle?", "Doodle Pad",
    MessageBoxButton.OKCancel) = MessageBoxResult.OK Then
  Surface.Strokes.Clear()
End If

Étape 19▲

Double-cliquez sur le bouton « Open… » et tapez ceci dans le Sub Open_Click :

Sélectionnez

Dim OpenDialog As New OpenFileDialog
OpenDialog.Filter = "Drawing (*.ipr)|*.ipr"
If OpenDialog.ShowDialog Then
  Try
    If OpenDialog.File.Exists Then
      Surface.Strokes.Clear()
      Read(OpenDialog.File.OpenRead, Surface.Strokes)
    End If
  Catch ex As Exception
    ' Ignore Errors
  End Try
End If

Étape 20▲

Double-cliquez sur le bouton « Save… » et tapez ceci dans le Sub Save_Click :

Sélectionnez

Dim SaveDialog As New SaveFileDialog
SaveDialog.Filter = "Drawing (*.ipr)|*.ipr"
If SaveDialog.ShowDialog Then
  Try
    Using FileStream As IO.StreamWriter =
        New IO.StreamWriter(SaveDialog.OpenFile)
      FileStream.Write(Write(Surface.Strokes))
    End Using
  Catch ex As Exception
    ' Ignore Errors
  End Try
End If

Étape 21▲

Double-cliquez sur le plus grand ComboBox (Size) et tapez ceci dans le Sub Size_SelectionChanged :

Sélectionnez

Dim _drawWidth As Double = Double.Parse(TryCast(Size.SelectedItem, ComboBoxItem).Tag)
drawSize = New Size With {.Height = _drawWidth, .Width = _drawWidth}

Étape 22▲

Double-cliquez sur le plus petit ComboBox (Colour) et tapez ceci dans le Sub Colour_SelectionChanged :

Sélectionnez

Dim _colour As String = CType(Colour.SelectedItem, ComboBoxItem).Tag
drawColour = Color.FromArgb(
  Byte.Parse(_colour.Substring(0, 2), HexNumber),
  Byte.Parse(_colour.Substring(2, 2), HexNumber),
  Byte.Parse(_colour.Substring(4, 2), HexNumber),
  Byte.Parse(_colour.Substring(6, 2), HexNumber)))

Étape 23▲

Enregistrez le projet maintenant que vous avez terminé l'application Silverlight. Sélectionnez Debug, ensuite Démarrer le débogage ou cliquez sur Démarrer le débogage :

Dès que vous l'aurez fait, ce qui suit apparaîtra dans une nouvelle fenêtre du navigateur :

Étape 24▲

Cliquez sur le ComboBox Colour pour modifier la couleur du dessin, la largeur du dessin peut être modifiée avec le premier ComboBox (Size), ensuite cliquez sur le bouton gauche de la souris et déplacez la souris pour dessiner, dessin qui peut ensuite être enregistré :

Étape 25▲

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 était un exemple simple d'application de dessin, utilisant le InkPresenter et LINQ pour enregistrer les « traits » utilisés pour dessiner - enregistré sous XML, et pouvant être ouvert par la suite. Essayez d'ajouter davantage de fonctionnalités telles que des tailles et des couleurs additionnelles - bref, personnalisez-la !

Liens▲

Télécharger le code source du tutoriel.

Démonstration en ligne du tutoriel.

Remerciements▲

Je tiens ici à remercier Peter Bull pour m'avoir autorisé à traduire son tutoriel.
Je remercie tomlev pour sa relecture technique et ses propositions.
Je remercie également Gurdil_le_nain pour sa relecture orthographique et ses propositions.

Vous avez aimé ce tutoriel ? Alors partagez-le en cliquant sur les boutons suivants :

Copyright © 2012 Peter Bull. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts. Droits de diffusion permanents accordés à Developpez LLC.