Discussion :

[UnSofteuxAmateur]

Salut

Je voudrais savoir si on peut obliger l'utilisateur d'une appli a ne rentrer, dans un tEdit, que des chiffres et pas de lettre.

Merci et bonne journée

[Cl@udius]

Salut,

Ben pourquoi tu n'as pas eu le reflêxe d'aller voir dans la FAQ ? Hein !

http://delphi.developpez.com/faq/?pa...propri#numbers

@+ Claudius

[UnSofteuxAmateur]

ben je l'ai vu ce liens mais ca me semble compliqué (je débute moi )...et puis je veux en plus absolument que ce soit un entier....

[Cl@udius]

Re,

J'ai repris le premier exemple de la FAQ pour lui interdire la saisie du séparateur décimal.

Ce qui donne:

Code :

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

1
2
3
4
5
6
 
procedure TMyForm.MyEditKeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9', Chr(VK_BACK), Chr(VK_DELETE)]) then
    Key := #0;
end;

@+

[All Jinx]

TMaskEdit sinon