Microsoft Silverlight 4 - Tutoriel 13 : Tweet Search

Application de recherche Twitter® simple

| Peter Bull | Deepin Prayag (Traduction) |

Traducteur

Deepin

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

- Titre : Microsoft Silverlight 4 - Tutoriel 13 : Tweet Search

- Auteurs : Peter Bull, Deepin Prayag (Traduction)

- Traducteur : Deepin

- Parution : 29 mars 2012

- Mise à jour : 13 avril 2012

- Licence : Copyright ® 2012 Peter Bull. Aucune reproduction, même partielle, ne peut être faite de ce site et 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.

Sommaire

- Traduction

- Introduction

- Application de recherche Twitter® simple

- Étape 1

- Étape 2

- Étape 3

- Étape 4

- Étape 5

- Étape 6

- Étape 7

- Étape 8

- Étape 9

- Étape 10

- Étape 11

- Étape 12

- Étape 13

- Étape 14

- Étape 15

- Étape 16

- Étape 17

- Étape 18

- Étape 19

- Étape 20

- Conclusion

- Liens

- Remerciements

Traduction

Ce tutoriel est la traduction la plus fidèle possible du tutoriel original de Peter Bull, Microsoft Silverlight 4 - Simple Twitter® Search Application.

Introduction

Tweet Search est une application simple qui vous permet de rechercher des tweets contenant une requête particulière avec le flux RSS Twitter® Search en utilisant LINQ et Silverlight.

Application de recherche Twitter® simple

Étape 1

Démarrez Microsoft Visual Web Developer 2010 Express, puis sélectionnez Fichier puis Nouveau Projet... Sélectionnez Visual Basic puis 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'applicationSilverlightsur unnouveau 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. Sélectionnez Projet puis Ajouter une classe..., et sélectionnez le modèle Classe s'il ne l'est pas déjà, puis changez le Nom à Tweet.vb :

Étape 6

Ajoutez la nouvelle classe au projet en cliquant sur Ajouter, puis dans la vue de code pour la nouvelle classe, en dessous de la ligne Public Class Tweet tapez ceci :

Private _title As String
Private _author As String
Private _link As String
Private _published As DateTime

Étape 7

Toujours dans la vue de code pour Tweet.vb, au-dessus du End Class pour Public Class Tweet tapez les propriétés suivantes :

Public Property Title As String
Get
Return _title
End Get
Set(ByVal Value As String)
_title = Value
End Set
End Property
Public Property Author As String
Get
Return _author
End Get
Set(ByVal Value As String)
_author = Value
End Set
End Property
Public Property Link As String
Get
Return _link
End Get
Set(ByVal Value As String)
_link = Value
End Set
End Property
Public Property Published As DateTime
Get
Return _published
End Get
Set(ByVal Value As DateTime)
_published = Value
End Set
End Property

Étape 8

Retournez au concepteur de vues de MainPage en sélectionnant l'onglet MainPage.xaml.

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

Étape 9

Dessinez une barre d'outils Canvassur la page, puis dans le volet XAML au-dessus de </Grid>modifiez la ligne Canvas1 comme ceci :

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

Voir ci-dessous :

Étape 10

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

Étape 11

Dessinez un TextBox sur le Canvaset dans le volet XAML en dessous de la balise <Button> et au-dessus de </Canvas>, modifiez TextBox1 comme ceci :

<TextBox Canvas.Left="6" Canvas.Top="6" Height="23" Width="237" Name="Subject"/>

Voir ci-dessous :

Étape 12

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

Étape 13

Dessinez un bouton sur la barre d'outils Canvas en glissant le bouton de la Boite à outils sur le Canvas, puis dans le volet XAML entre les balises <Canvas> et </Canvas> modifiez la ligne <Button> comme ceci :

<Button Canvas.Left="249" Canvas.Top="6" Height="23" Width="75" Name="Search" Content="Search"/>

Voir ci-dessous :

Étape 14

Toujours dans le volet XAML, en dessous de la balise </Canvas> et au-dessus de la balise </Grid> tapez le code ListBox XAML suivant :

<ListBox Height="265" Width="400" Margin="0,35,0,0" HorizontalAlignment="Left" VerticalAlignment="Top" Name="Results">
<ListBox.ItemTemplate>
<DataTemplate>
<StackPanel Width="360" Orientation="Vertical">
<HyperlinkButton NavigateUri="{Binding Path=Link}">
<HyperlinkButton.Content>
<TextBlock TextWrapping="Wrap" Text="{Binding Path=Title}"/>
</HyperlinkButton.Content>
</HyperlinkButton>
<TextBlock Text="{Binding Path=Published}"/>
<TextBlock FontWeight="Bold" Text="{Binding Path=Author}"/>
</StackPanel>
</DataTemplate>
</ListBox.ItemTemplate>
</ListBox>

Voir ci-dessous :

Étape 15

Faites un clic droit sur la page ou sur l'entrée pour 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 :

Imports System.Xml.Linq

Étape 16

Puisque nous en sommes à la vue de code pour MainPage.xaml, en dessous du End Sub pour le constructeur Public Sub New() tapez les Subs suivants :

Private Sub Tweets(ByVal Sender As Object, _
ByVal e As DownloadStringCompletedEventArgs)
Dim _xml As XElement
Try
If Not e.Cancelled Then
_xml = XElement.Parse(e.Result)
For Each Value As XElement In _xml.<channel>.<item>
Dim _tweet As New Tweet
_tweet.Title = Value.<title>.Value
_tweet.Published = Value.<pubDate>.Value
_tweet.Author = Replace(Value.<author>.Value, "@twitter.com", "")
_tweet.Link = Value.<link>.Value
Results.Items.Add(_tweet)
Next
End If
Catch ex As Exception
' Ignore Errors
End Try
End Sub

Private Sub Query(ByRef Value As String)
Dim _client As New WebClient
AddHandler _client.DownloadStringCompleted, AddressOf Tweets
_client.DownloadStringAsync(New Uri("http://search.twitter.com/search.rss?rpp=50&q=" & Value))
End Sub

É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 pour MainPage.xaml dans l'Explorateur de solutions et choisissez l'option Concepteur de vues.

Double-cliquez sur le bouton « Search » et tapez ceci dans le SubSearch_Click:

Query(Subject.Text)

Étape 18

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 :

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

Étape 19

Maintenant, saisissez quelque chose dans le TextBox pour effectuer une recherche, ensuite cliquez sur le bouton Search pour afficher les cinquante premiers résultats :

Étape 20

Fermez la fenêtre du navigateur en cliquant sur le bouton Fermer en haut à droite du navigateur Web pour Arrêter l'application.

Conclusion

Ceci est un exemple très simple pour obtenir des résultats de recherche de Twitter®. Vous pouvez aussi obtenir d'autres résultats basés sur les RSS tels que les délais utilisateurs (user timelines) et même plus, c'est à vous de voir !

Liens

Télécharger le code source du tutoriel.

Démonstration en ligne du tutoriel.

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 ClaudeLELOUP pour sa relecture orthographique et ses propositions.