Discussion :

[noftal]

Bonjour,

J'ai découvert récemment les subtilités des paramètres régionaux en matière de séparateur décimal.
Par exemple, si vous avez réglé vos paramètres Windows de sorte que le séparateur décimal est la virgule, que ce soit dans l'onglet nombres ou dans l'onglet système monétaire, le point du pavé numérique va continuer de taper un point.
Donc mon objectif est de lui faire taper une virgule

Voilà le code que j'ai tenté dans un form :

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
    Private Sub DG_HistoriqueAchats_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) _
        Handles DG_HistoriqueAchats.KeyPress
        If _IsDecimalPressed Then
            e.KeyChar = CultureInfo.CurrentCulture.NumberFormat.CurrencyDecimalSeparator
        End If
    End Sub
 
    Private Sub DG_HistoriqueAchats_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) _
        Handles DG_HistoriqueAchats.KeyDown
        If e.KeyData = Keys.Decimal Then
            _IsDecimalPressed = True
        End If
    End Sub
 
    Private Sub DG_HistoriqueAchats_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) _
        Handles DG_HistoriqueAchats.KeyUp
        _IsDecimalPressed = False
    End Sub

DG.HistoriqueAchat est un datagridview contenu dans le Form

Pas de chance, le code ne rentre jamais dans l'event KeyPress ou KeyDown.

Je ne comprends pas pourquoi.

[zebrette]

Est ce que tu essaies d'intercepter les événements quand une cellule est en mode edition (quand l'utilisateur tape du texte). Si c'est le cas il te faut peut être ecrire ta propre textbox cell + editing control et intercepter les Keys sur le editing control ou les

Alternativement, tu peux essayer d'intercepter l'événement CellValidating et changer les "." en ",".

de manière générale il vaut mieux ne pas combattre le systeme en essayant d'alterer ce genre de comportements, l'utilisateur est habitué à ses parametres régionaux et ce n'est que de l'affichage. C'est quand ton code utilise la valeur entrée par l'utilisateur que tu devrais t'assurer que le format est compatible avec les opérations que tu fais...

[chrismonoye]

Bonjour,
une solution parmi d'autres.
Ce qui donne :

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
    Private Sub DataGridView1_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) _
    Handles DataGridView1.EditingControlShowing
 
        AddHandler e.Control.KeyDown, AddressOf control_KeyDown
 
    End Sub
 
    Private Sub control_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs)
 
        If e.KeyData = Keys.Decimal Then
            Dim _IsDecimalPressed = True
            TextBox1.AppendText("_IsDecimalPressed" & Environment.NewLine)
        End If
 
    End Sub