Le label du parent : une image mais comment ?
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:
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:
1 2 3 4 5 6
|
Table::Table () : TAdvPicture (Main) {
label = new TLabel(this);
label->Transparent = true;
} |
Code:
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