Bonjour !
Je cherche à placer des gardes fous à mon programme histoire de pouvoir gérer les erreurs de saisies possibles. J'ai une solution mais avouez que c'est pas tres élégant...
Cette procedure sera appelée dans la procedure principale déclenchée par un bonton.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 procedure Tform1.controle ; begin ctr := 'veuillez remplir tous les champs obligatoires' ; if edit1.text = ' ' then showmessage(ctr) ; ........................................................ if edit10.text = ' ' then showmessage(ctr) ; end ;
Est il possible de controler avec une boucle for (de 1 à 10 faire le controle) ? Ou même une autre solution ?
merci![]()
Partager