Discussion :

[echap2000]

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

[totoche76]

Hello,

Sur quelle ligne a lieu l'erreur (si tu as le message extact, c'est encore mieux) ?

De quoi dérive TAdvPicture ?

[echap2000]

à cette ligne= Tables[i]->label->Parent = Tables[i];

comment savoir de quoi il dérive

[pottiez]

Ton TAdvPicture est un composant que tu à installer sur ton Builder ?
Tu devrait avoir une doc ou un fichier d'aide qui t'indiquerait de qu'elle composant il herite

[totoche76]

à cette ligne= Tables[i]->label->Parent = Tables[i];

comment savoir de quoi il dérive

10 balles que TAdvPicture dérive de TGraphicControl.
TLabel:: Parent doit être un TWinControl (un contrôle fenêtré, quoi).
TAdvPicture ne dérivant pas de TWinControl, quéquette...

A voir la description chez TMSSoftware, ca sert pour afficher des fichiers images. Ca n'a pas l'air d'être un conteneur pour d'autres contrôles, ce dont tu aurais besoin si j'ai bien compris...

Ou alors tu détournes le problème: tu fais de ton TForm le conteneur du TLabel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Tables[i]->label->Parent = this; // <=> Tables[i]->Parent

[echap2000]

merci totoche.. tu as raison de ce côté là
mais on ne peut pas créer un label sur une TAdvPicture ?? Je ne suis pas au boulot mais je pense que je peux créer un label sur un TAdvPicture en mode graphique. il faut que je vérifie

[pottiez]

Salut,
oui tu peut en placer un au dessus de ton TAdvPicture, mais il ne lui sera pas associé, il sera associé à la Form ou à un autre objet qui serai lui même sous le TAdvPicture et aurai des coordonnées qui font que les deux composant sont superposé.

[echap2000]

j'aurai dû vérifier en mode graphique. Effectivement on ne peut pas faire un ajout de label sur un composant "image" .. je ne savais pas.
merci

problème résolu.. j'ai résolu le problème d'une autre manière