Hello,
With a name like yours, I bet you are french, so I'll take the chance and write in french.
If you are not, I'll translate to english
Tout d'abord, je ne suis qu'un amateur et aucunement membre de ce projet. Je me dérouille en PHP mais je découvre le Delphi alors...
J'ai regardé ton projet, et je pense que tu vas avoir du mal à accomplir ce que tu souhaites avec tes cases à cocher ET sans utiliser des conditions.
Ton script précise quoi faire si une case est cochée, mais pas quoi faire dans les autres cas.
Pour commencer, voici la liste des conditions à tester pour couvrir tous les cas possibles : tu as 2 cases à cocher avec 2 états possibles pour chacune, ce qui te donne un total de 4 combinaisons à tester :
fumer coché et non-fumer non coché
fumeur non coché et non-fumeur coché
fumeur non coché et non-fumeur non coché
fumeur cochéet non-fumeur coché
Pour te simplifier la vie, je mettrais des menus déroulants à la place des cases à cocher, en faisant un test sur le contenu (ComboBox.Text) plutôt que sur l'état de tes cases.
J'ai fais vite fait un petit projet pour toi mais pas le tiens (sinon ce n'est pas drôle hein ?) dans lequel on saisit des contacts en précisant leur sexe :
au moment de la saisie, sélectionner un genre dans le menu déroulant affiche l'image correspondante dans la fiche
ensuite, en double cliquant dans la grille (mode édition), les images s'adaptent au genre de la personne
j'ai aussi couvert le cas où le sexe n'est pas précisé, mais cela ne me fait toujours que 3 cas à tester, au lieu des 4 avec tes cases
Jette un oeil, en espérant que cela t'aide.
NOTE 1 : j'ai essayé de faire en sorte que l'image s'affiche à la simple sélection de la ligne dans la grille (simple clic au lieu de double), mais je me creuse encore la tête la dessus.
NOTE 2 : La version utilisée est la 1.49
A bientôt
Math
I'm a very good housekeeper !
Each time I get a divorce, I keep the house
Zaza Gabor