saisir rien que des chiffres dans un Tedit

**trop2pb** · 27/07/2006, 11h09

saut a tous en fait je ne voudrais saisir que des chiffres dans un TEDIT de telle sorte que tous caracteres ou lettre saisis ne s'affiche pas comment faire

**mika** · 27/07/2006, 11h14

Dans l'évenement onkeypress

Code :

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

1
2
3
 
if key not in [0..9] then
 key := #0

[Balises CODE rajoutées par Pedro. Merci d'y penser à l'avenir]

**judor31** · 27/07/2006, 11h21

salut,

Code :

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

1
2
3
4
5
 
procedureTform1.Edit1keyPress(sender:TObject; var key: char);
begin
if not (key in [#8, '0'..'9']) then key:=#0;
end;

[Balises CODE rajoutées par Pedro. Merci d'y penser à l'avenir]

**Rayek** · 27/07/2006, 11h58

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

**trop2pb** · 27/07/2006, 12h28

merci bien ca marche a+++

**Pedro** · 27/07/2006, 13h46

+

saisir rien que des chiffres dans un Tedit

Delphi

Discussions similaires

Partager

Partager