Bonjour,
J'ai remarqué, dans un code, que le concepteur avait déclaré sa fonction dans la zone private et qu'ensuite dans le corps de la fonction il utilisait les objets de la Form1 sans aucune autre référence. Je me suis donc dit que le fait d'avoir ainsi fait la déclaration autorisait une telle utilisation des objets.
J'ai tenté la même chose avec la procédure ci-dessous, mais j'ai un arrêt à la compilation avec le message:
Identificateur non déclaré:'Clas1Niv'ma procédure sert, comme vous pouvez le voir, à calculer la somme de 4 Tedit dès que l'on sort de l'un des 4.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Procedure CalculNiveauGlobal(); begin // Calcul du niveau global du PJ/PNJ if Clas1Niv.Text <> '' then // un niveau pour la classe de base à été saisi NGlobal := NGlobal + StrToInt(Clas1Niv.Text); if Clas2Niv.Text <> '' then // un niveau pour la 2ème classe à été saisi NGlobal := NGlobal + StrToInt(Clas2Niv.Text); if Clas3Niv.Text <> '' then // un niveau pour la 3ème classe à été saisi NGlobal := NGlobal + StrToInt(Clas3Niv.Text); if Clas4Niv.Text <> '' then // un niveau pour la 4ème classe à été saisi NGlobal := NGlobal + StrToInt(Clas4Niv.Text); NivGlobal.Caption := IntToStr(NGlobal); end;
Merci d'éclairer ma luciole.
Partager