salut
jai une form qui contient des champs edit jaimerait bien effacer le contenu de c champs en utilisant une touche de raccourci par exemple la letre n du clavier c-a-d quand j'apu sur la letre n les champs sera vide
merci
salut
jai une form qui contient des champs edit jaimerait bien effacer le contenu de c champs en utilisant une touche de raccourci par exemple la letre n du clavier c-a-d quand j'apu sur la letre n les champs sera vide
merci
salut , par exemple
ne pas oublier de mettre le Keypreview de la form a true
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); var i: integer; begin if key='n' then begin for I := 0 to pred(ComponentCount) do if Components[i] is TEdit then TEdit(Components[i]).clear; key:=#0; end; end;
Merci bien mon amis c ca ce que je cherche c tre gentil
merci
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager