Discussion :

[glandu.dulac]

Bonjour,

Je développe un jeu en VB.net avec le binding .NET de SFML (une hérésie pour les pro C++ mais y en faut pour tout le monde). J'ai pas mal avancé dans mon projet mais j'arrive à un point bloquant concernant la gestion des événements de l'objet Window.

J'ai l'habitude de m'appuyer sur les exemples en C# ou C++ pour comprendre les fonctionnalités de la librairie et les appliquer à VB.net, mais sur ce point précis je suis bloqué.

Pas compris par exemple comment instancier et gérer ne serait-ce que l'événement window.closed. Quelqu'un aurait un exemple basique ?

Merci de votre aide !

[Savak]

Bonjour,

Voici un exemple de l’événement Window.Closing tiré de MSDN :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Imports System ' EventArgs
Imports System.ComponentModel ' CancelEventArgs
Imports System.Windows ' window
 
Namespace VisualBasic
    Partial Public Class DataWindow
        Inherits Window
        ' Is data dirty
        Private isDataDirty As Boolean = False
 
 
...
 
 
        Private Sub DataWindow_Closing(ByVal sender As Object, ByVal e As CancelEventArgs)
            MessageBox.Show("Closing called")
 
            ' If data is dirty, notify user and ask for a response
            If Me.isDataDirty Then
                Dim msg As String = "Data is dirty. Close without saving?"
                Dim result As MessageBoxResult = MessageBox.Show(msg, "Data App", MessageBoxButton.YesNo, MessageBoxImage.Warning)
                If result = MessageBoxResult.No Then
                    ' If user doesn't want to close, cancel closure
                    e.Cancel = True
                End If
            End If
        End Sub
    End Class
End Namespace

L'événement "Closed" s'instancie de la même manière mais se produit lorsque la fenêtre est sur le point de se fermer contrairement à "Closing" qui se produit directement après l'appel de Close et peut être géré pour annuler la fermeture de la fenêtre.

Sources : http://msdn.microsoft.com/fr-fr/libr...w.closing.aspx

[glandu.dulac]

Merci Savak, même si je ne vois pas encore comment appliquer cette méthode à la SFML. Je te tiens au jus.

[glandu.dulac]

Ok, voici la solution, Laurent Gomilla l'auteur de la SFML m'a mis sur la voie :

Code vbnet :

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

1
2
3
4
sub gameThread()
    dim wndGame as sfml.graphics.renderWindow
    AddHandler wndGame.Closed, AddressOf OnClosed
end sub

Code vbnet :

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

1
2
3
4
   Sub OnClosed(sender As Object, e As EventArgs)
    Dim window As RenderWindow = DirectCast(sender, RenderWindow)
    window.Close()
End Sub

[_Ez3kiel]

Ok, voici la solution, Laurent Gomilla l'auteur de la SFML m'a mis sur la voie :

Code vbnet :

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

1
2
3
4
sub gameThread()
    dim wndGame as sfml.graphics.renderWindow
    AddHandler wndGame.Closed, AddressOf OnClosed
end sub

Code vbnet :

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

1
2
3
4
   Sub OnClosed(sender As Object, e As EventArgs)
    Dim window As RenderWindow = DirectCast(sender, RenderWindow)
    window.Close()
End Sub

N'oublie pas le RemoveHandler qui va de pair avec le AddHandler

[glandu.dulac]

Ok, merci Ez3kiel.