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 :

Image non disponible

É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 :

Image non disponible

Étape 3

Une page vierge nommée MainPage.xaml devrait alors apparaître :

Image non disponible

É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 :

Image non disponible

É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 :

Image non disponible

É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 :

Image non disponible

Étape 7

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

Image non disponible

É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 :

Image non disponible

É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 :

Image non disponible

É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 :

Image non disponible

É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
Image non disponible

É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}
Image non disponible

É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
Image non disponible

É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
Image non disponible

É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 :

Image non disponible

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)
Image non disponible

É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 :

Image non disponible

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

 
Sélectionnez
drawStroke = Nothing
Image non disponible

Étape 17

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 :

Image non disponible

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
Image non disponible

Étape 18

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.

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
Image non disponible

Étape 19

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.

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
Image non disponible

Étape 20

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.

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
Image non disponible

Étape 21

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.

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}
Image non disponible

Étape 22

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.

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)))
Image non disponible

É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 :

Image non disponible

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

Image non disponible

É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é :

Image non disponible

Étape 25

Fermez l'application et la fenêtre du navigateur en cliquant sur le bouton Fermer Image non disponible 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

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.