t editRésolu

Question

bonjour a tous 
je developpe une ptitt application et je souhaite savoir kelke truc 

 comment faire pour limiter certaines valeurs dans un t edit ?  c'est a dire que je souhaite entre rien que les valeurs allant de 0 à 20( ex : 12, 13,5, 18 ,0,5 etc...) et pas plus dans un t edit que j'ai bloqué pour ne recevoir que des valeurs numeriques  
merci

f0xi · Accepted Answer

if not (StrToIntDef(TEdit(Sender).Text, -1) in [0..20]) then
begin
  TEdit(Sender).Clear;
  ShowMessage('Ne doit contenir que des chiffres de 0 à 20');
end;




<hr size="2" width="100%" />

JulioDelphi · Answer

salut

sur le OnExit du TEdit :

if not StrToIntDef(TEdit(Sender).Text, -1) in [0..20] then
begin
  TEdit(Sender).Clear;
  ShowMessage('Ne doit contenir que des chiffres de 0 à 20');
end;

a+

madcap · Answer

Dans le FormCreate tu peux mettre :

SetWindowLongA(monTEdit.Handle, GWL_STYLE,  GetWindowLongA(monTEdit.Handle, GWL_STYLE) or ES_NUMBER);

Ainsi, même en faisant un copier coller, tu ne peux pas mettre de texte dedans.
Par contre il faut combiner avec les autres solutions pour limiter la saisie de chiffres entre 0 et 20.

T edit

3 réponses

Votre réponse

Discussions similaires