PoPoV83
Messages postés7Date d'inscriptionmardi 6 mai 2003StatutMembreDernière intervention22 mai 2003
-
22 mai 2003 à 15:03
OlivierM92
Messages postés7Date d'inscriptionmardi 12 octobre 2004StatutMembreDernière intervention31 mars 2006
-
15 oct. 2004 à 11:40
Salut
Quelqu'un saurait-il comment empecher de rentrer un zero dans un TEdit. Je bosse sur Delphi 5
Merci d'avance
Pegase20
Messages postés5Date d'inscriptionlundi 19 mai 2003StatutMembreDernière intervention26 mai 2003 22 mai 2003 à 15:33
bon je te propose ca mai je garanti rien!
ce que tu pe faire c'est utiliser la fonction OnChange (que tu trouve dans l'inspecteur d'objet, onglet evenement de ton Edit). tu recup ce qui se trouve dans l'edit tu compare avec 0 et si c'est un zero tu affiche un message d'erreur.
voila c po terrible mai bon si tu trouve pa mieu essaie ca
:shy)
OlivierM92
Messages postés7Date d'inscriptionmardi 12 octobre 2004StatutMembreDernière intervention31 mars 2006 15 oct. 2004 à 11:40
Bonjour,
je te propose une autre solution ... C est a dire de faire un mini gestion des touches du clavier ..
.
D abord tu mets a propriétés KeyPreview de ta Form Active à True (ce qui permets à l'exe de catpurer le claver avant d envoyer le caractere à l appli!
Ensuite dans les evenements OnKeypress de ta fenetre edit,
tu vas avoir le code suivant :
procedure TForm1.EntreeClav(Sender: TObject; var Key: Char);
//CHAR correspond au code Hexa de la touche enfoncee
begin
//Si La touche est la touche 0, alors la valeur de la touche est RIEN
if key='0' then key:=#0;
{ Un autre truc, qui est utilisé notamment pour ampecher la frappe de lettre dans une application type Calculette, c est de donner l ensemble des Touches Acceptées :
Ca devrait aller comme ca. entout cas c est la solution la plus simple que je connaisse.
Sinon tu peux aussi gerer les Handle Windows, mais là c est un peu plus Sportif ...