Discussion :

[madnux]

Bonjour à tous,



Je voudrais contrôler la saisie clavier sur un TEdit. J'ai en fait besoin que l'utilisateur qui rentre les données soit obligé de rentrer des chiffres. Donc que lorsqu'il essaye de rentrer une lettre par exemple, la lettre ne s'affiche pas.


J'ai pensé à OnKeyDown mais après je n'arrive pas à trouver le bon cheminement de code pour avoir ce que je veux...



Pourriez-vous m'éclairer ?

[blondelle]

Salut madnux
Un lien qui je pense t'aidera

http://chgi.developpez.com/tips1/#tips12

[madnux]

Salut madnux
Un lien qui je pense t'aidera

Je te remercie Blondelle


Tu m'as vraiment bien aidé la dessus Je ne pense pas que j'aurais pu trouver seul.

[blondelle]

Je suis content pour toi.
A+

[Alfred12]

Un TMaskEdit doit également fonctionner.

[lenrok]

Bonjour madnux,

Comme l'a suggéré Alfred12, l'utilisation de TEditMask est plus simple à gérer dans ton cas :
Déclare dans la fenêtre PROPRIETE de TEditMask1 :
- MaxLength :

= 0 //nbre caractère infini

= 4 //nbre caractère LIMITE à 4 caractères

- EditMask :

0 caractère numérique OBLIGATOIRE

9 caractère numérique NON OBLIGATOIRE

A caractère alphanumérique OBLIGATOIRE

a caractère alphanumérique NON OBLIGATOIRE

L caractère alphabètique OBLIGATOIRE

l caractère alphabètique OBLIGATOIRE

Bon Courage...

[Pendary]

Voici le prototype de onkeydown

Code :

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

(TObject *Sender, Word &Key, TShiftState Shift)

je pense que t udevrais tester l'état de Key, l'aide nous dis que

Code :

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

chr(Key)

nous fournit le caractère taper par l'utilisateur