Bonjour,
Je souhaite tester si tout les TEdit de mon application sont remplits, si tel est le cas, le programme peut continuer sinon je souhaite qu'un message s'affiche : 'Champs incomplets'.
J'ai procédé de la manière suivante, avec un IF et des OR pour tester tout les Tedit et voir si ils sont complétés, ce test est placé au tout début de la procédure concernée.
Je peut compiler, mais si je clic sur le bouton Résultat (la procédure de ce boutton est celle dont je parle ci-dessu) sans avoir remplit 1 ou plusieurs des Tedit; alors je n'ai pas mon showmessage mais un message d'erreur standard qui m'informe que ' '' n'est pas une valeur en virgule flottante correcte'. Comme si je n'avais pas mit mon IF.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 if (Edt1.Text = '') Or (Edt2.Text = '') Or (Edt3.Text = '') Or (Edt4.Text = '') then ShowMessage ('Champs incomplets'); ...suite du programme...
Savez-vous pourquoi ?
Merci pour votre aide précieuse !![]()
Partager