Discussion :

[praspail]

Bonjour,
J'ai créé une application dans laquelle je veux communiquer entre mes pages xaml via une frame.
J'ai créé un bouton qui m'affiche la première page jusque là pas de problème.
Dans ma page 1 j'ai d'autres boutons qui doivent m'afficher de nouvelles pages à la place de la précèdente dans la même frame.
Là ça bloque, aucune réaction...

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
MainPage avec Btn1
Private Sub Btn1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles VigInt.MouseDown
        FrameSP.source = New System.Uri("PageSP1.xaml", UriKind.Relative)
    End Sub 
 
PageSP1
Private Sub Btn2_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles VigInt.MouseDown
        FrameSP.source = New System.Uri("PageSP2.xaml", UriKind.Relative)
    End Sub
 
 
PageSP1
Private Sub Btn3_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles VigInt.MouseDown
        FrameSP.source = New System.Uri("PageSP3.xaml", UriKind.Relative)
    End Sub

Je suppose qu'il faudrait fermer la page 1 mais je n'ai pas trouvé comment faire.

Une solution me serait bien utile, merci d'avance de vos réponses.
Cordialement.
Philippe

[Thomas Lebrun]

Fais plutôt un FrameSP.NavigationService.Navigate(uri) pour naviguer entre tes pages

[praspail]

Merci pour votre réponse.

Voici la solution complète qui fonctionne :

Code :

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
MainPage avec Btn1
Private Sub Btn1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles VigInt.MouseDown
        FrameSP.source = New System.Uri("PageSP1.xaml", UriKind.Relative)
    End Sub

PageSP1

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Btn2_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles VigInt.MouseDown
       Dim uri As New Uri("PageSP2.xaml", UriKind.Relative)
Me.NavigationService.Navigate(uri)
    End Sub