J'ai une classe Table qui hérite le composant TImage

Dans la construction des tables, je dois créer un label qui a la "Caption" qui vaut le nom de la table . Par exemple "1" , "2" etc...

Le parent du label est Table. mais comme les experts ont sans doute remarquer, ça ne marchera pas . J'ai une erreur soit disant : "impossible de convertir table en wincontrol"

voici un peu de code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
class Table : public  TAdvPicture
{
  private:
 
 
 
  public:
   AnsiString id;
    TFTable *form;
    Table() ;
    int index;
 
    TLabel *label;
    AnsiString id_plan;
    AnsiString nom;
    DYNAMIC void __fastcall MouseDown (TMouseButton Button, TShiftState Shift, int X, int Y);
 
};
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Table::Table () : TAdvPicture (Main) {
 
  label = new TLabel(this);
  label->Transparent = true;
}

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
   for (int i=0;i<Taille(tab);i++)
    {
      Tables[i]= new Table ();
      Tables[i]->Parent = this;
      Tables[i]->Visible = false;
      Tables[i]->id_plan = CHAMP(i,"id_plan");
      Tables[i]->form = this;
      Tables[i]->Left = _INT_(CHAMP(i,"left"));
     // Tables[i]->Layout = blGlyphLeftAdjusted;
      Tables[i]->Width  = _INT_(CHAMP(i,"width"));
      Tables[i]->nom    = CHAMP(i,"nom");
      Tables[i]->Height  = _INT_(CHAMP(i,"height"));
      Tables[i]->index  = i;
      Tables[i]->Top  = _INT_(CHAMP(i,"top"));
//      Tables[i]->Caption = CHAMP(i,"nom");
      Tables[i]->id     = CHAMP(i,"id");
      Tables[i]->Cursor = crHandPoint;;
 
      Tables[i]->label->Parent = Tables[i];
      Tables[i]->label->Caption = Tables[i]->nom ;
.....
Merci