Canvas is not a member of TTabsheet
Bonjour je suis en train de développer un petit logiciel personnel et la je pense avoir épuiser les FAQ sur les icones
Bon le problème que je rencontre est le suivant ''Canvas is not a member of TTabsheet'' lors de la compilation sous BCB 6.
en gros je récupère l'icone d'un fichier et je veux le mettre sur un TTabSheet
J'ai trouvé un bout de code dans les FAQ qui marche très bien et merci au auteurs.
Citation:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if ( OpenDialog1->Execute() )
{
Ligne1->Text = OpenDialog1->FileName;
}
char* Adresse = new char[ Ligne1->Text.Length() + 1 ];
strcpy( Adresse, Ligne1->Text.c_str() );
WORD pIcon = 0;
HICON hicon = ExtractAssociatedIcon(HInstance, Adresse, &pIcon);
if (hicon == NULL)
{
MessageBox(NULL, "Raté", "Icon", MB_OK);
return;
}
DrawIcon(TabSheet1->Canvas->Handle, 0, 0, hicon);
DestroyIcon(hicon);
}
DrawIcon(Form1->Canvas->Handle, 0, 0, hicon); si je mets cela alors je vois bien mon icone
mais avec TabSheet1 alors j'ai mon erreur de compilation.
j'ai essayé de mettre mon icone dans un SpeedButton1 mais sans succes :-(
car ca me donne une autre erreur '' TGraphicControl::Canvas is not accessible''
Alors je suis perdu la
