Bonjour à vous tous ,
bon je souhaite empêcher l'utilisateur à saisir plus qu'un chiffre dans un edit pour se faire j'ai utilisé le code suivant
Mais ce code ne laisse saisir que des chiffres mais moi je veux que l'utilisateur pourra saisir qu'un seul chiffre dans l'edit ! quelqu'un peut me guider s'il vous plait
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 if not (Key in ['0'..'9', DecimalSeparator, Chr(VK_BACK), Chr(VK_DELETE)]) then Key := #0; if Key = DecimalSeparator then if Pos(DecimalSeparator, edit3.Text) <> 0 then Key := #0;
Merci d'avance
Cordialement
Partager