Discussion :

[Miska59]

Bonjour,

par exemple : je choisie 15 minute mais j'arrive pas à réduire avec les secondes avec FillPie (voir image en dessous).



mon code timer_Tick :

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
 If (_seconds = 0) AndAlso (_minutes = 0) Then
            timer.Enabled = False
            Console.Beep()
            _minutes = 0
            _seconds = 0
        Else
            If _seconds < 1 Then
                _seconds = 59
                If _minutes = 0 Then
                    _minutes = 59
                Else
                    _minutes -= 1
                End If
            Else
                _seconds -= 1
            End If
            Me.Refresh()
        End If

Mon code FillPie :

Code :

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

1
2
Dim EndAngle As Integer = (_minutes * 6 - _seconds / 60)
        g.FillPie(New SolidBrush(_ColorCercle), New Rectangle(Rect.X + Rect.Width / 14, Rect.Y + Rect.Height / 7, Rect.Width / 1.2, Rect.Height / 1.2), -90, EndAngle)

Pouvez-vous m'aider à avec FillPie avec les minutes et les secondes? merci d'avance

[umfred]

Ton code FillPie est appelé à chaque tick ?

[Miska59]

Bonjour, j'ai trouvé la solution à mon problème.

voici en image :

mon problème, une fois qui arrive à zéro compte à rebours, je voudrais envoyer une action au bouton1 par rapport à une class dans timer_Tick.

dans ma class :

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
Private Sub timer_Tick(sender As Object, e As EventArgs)
        If (_seconds = 0) AndAlso (_minutes = 0) Then
            timer.Enabled = False
            Console.Beep()
            _minutes = 0
            _seconds = 0
           'Renvoyer un action au button1
        Else
            If _seconds < 1 Then
                _seconds = 59
                If _minutes = 0 Then
                    _minutes = 59
                Else
                    _minutes -= 1
                End If
            Else
                _seconds -= 1
            End If
            Me.Refresh()
        End If
    End Sub

avez_vous une idée pour renvoyer une action au button1 quand le compte à rebours arrive à zéro?

[umfred]

qu'est-ce que tu entends par "renvoyer une action au button1" ? si c'est lui faire faire un clic, appelle juste la fonction gérant son clic (button1_click (Me, Nothing) en principe, ou button1.PerformCleick(), en mettant bien sûr le nom de ton bouton)

[Miska59]

Bonjour umfred,

qu'est-ce que tu entends par "renvoyer une action au button1" ? si c'est lui faire faire un clic, appelle juste la fonction gérant son clic (button1_click (Me, Nothing) en principe, ou button1.PerformCleick(), en mettant bien sûr le nom de ton bouton)

voici l'action pour renvoyer dans button1 :

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Event OnClickEventHandler(ByVal sender As Object, ByVal e As EventArgs)
 
If (_seconds = 0) AndAlso (_minutes = 0) Then
            timer.Enabled = False
            RaiseEvent OnClickEventHandler(Me, e) <= l'action renvoyer dans form1
            Console.Beep()
            _minutes = 0
            _seconds = 0
        Else
...etc

dans form1 :

Code :

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

1
2
3
4
5
6
 
 
Private Sub OnClickEventHandler(sender As Object, e As EventArgs) Handles MyAlarme21.OnClickEventHandler
        Button1.PerformClick()
        NumericUpDown1.Value = 0
    End Sub

voilà comment j'ai fait pour renvoyer une action avec le button1.