Bonjour à toutes et tous,

Bon un petit problème que je n'ai pas pu résoudre :

j'ai 60 composants TStaticText en 5 lignes de 12 composants (tableau)
à chaque ligne correspond un objet
à chaque colonne correspond un mois.

donc
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
              1  2  3  4  5  6  7  8  9  10 11 12
objet_alpha   X  X  X  X  X  X  X  X  X  X  X  X
objet_beta    X  X  X  X  X  X  X  X  X  X  X  X
objet_charlie X  X  X  X  X  X  X  X  X  X  X  X
objet_delta   X  X  X  X  X  X  X  X  X  X  X  X
objet_etc..   X  X  X  X  X  X  X  X  X  X  X  X
les 60 TStaticText se nomment donc
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
objet_alpha_1,objet_alpha_2,objet_alpha_3, etc ...
objet_bravo_1,objet_bravo_2,objet_bravo_3, etc ...
Je souhaite pouvoir construire le nom du composant à partir des infos contenues dans la base de données :
ainsi dans le SGBD si sgbd.fieldbyname('objet_alpha').integer <> 0 alors je teste la date pour définir le mois et je construis le nom de mon composant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
decodedate(sgbd.fieldbyname('date_don').asDateTime,annee,mois,jour);
et ensuite je bute je voudrais faire un truc un peu comme
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
var_nom_compo:='objet_alpha'+inttostr(mois);
 
var_nom_compo.Caption :='X';
Mais bon j'y arrive pas suis pas assez doué en Pascal

Merci de vos réponses