Insertion d'une image bitmap dans un contrôle d'une application Fiches VCL

Remonter à Comment construire une application Fiches VCL avec des graphiques

Cette procédure ajoute une image bitmap à une boîte à options d'une application Fiches VCL.

1. Créer une fiche VCL.
2. Ajouter des composants à la fiche.
3. Définir des propriétés des composants dans l'inspecteur d'objets.
4. Ecrire des gestionnaires d'événements pour l'action de dessin des composants.
5. Construire et exécuter l'application.

Pour créer une fiche VCL avec un composant TComboBox

1. Choisissez Fichier > Nouveau > Autre > Projets Delphi ou Projets C++Builder et double-cliquez sur l'icône Application Fiches VCL. Le Concepteur de fiches VCL apparaît.
2. Sur la page Win32 de la palette d'outils, placez un composant TImageList sur la fiche.
3. Sur la page Standard de la palette d'outils, placez un composant TComboBox sur la fiche.

Pour définir les propriétés d'un composant

1. Sélectionnez ComboBox1 sur la fiche.
2. Dans l'inspecteur d'objets, définissez la liste déroulante de la propriété Style à csOwnerDrawFixed.
3. Dans l'inspecteur d'objets, cliquez sur le bouton points de suspension à côté de la propriété Items. L'éditeur de liste de chaînes s'affiche.
4. Entrez une chaîne à associer à l'image bitmap, par exemple MyImage, puis cliquez sur OK.
5. Double-cliquez sur ImageList1 dans la fiche. L'éditeur ImageList s'affiche.
6. Cliquez sur le bouton Ajouter pour afficher la boîte de dialogue d'ajout d'images.
7. Localisez une image bitmap à afficher dans la boîte à options.Pour localiser une image, vous pouvez rechercher les images *.bmp sur votre disque local. Sélectionnez une très petite image comme une icône. Copiez-la dans le répertoire de votre projet et cliquez sur Ouvrir. L'image s'affiche dans l'éditeur ImageList.
8. Cliquez sur OK pour fermer l'éditeur.

Pour ajouter le code du gestionnaire d'événement

1. Dans la vue Fiche VCL, sélectionnez ComboBox1.
2. Dans l'inspecteur d'objets, cliquez sur la page Evénements et double-cliquez sur l'événement OnDrawItem.L'éditeur de code s'affiche, avec le curseur placé dans le bloc du gestionnaire de l'événement ComboBox1DrawItem (Delphi) ou ComboBox1::DrawItem (C++).
3. Entrez le code suivant pour ce gestionnaire d'événement :

Combobox1.Canvas.FillRect(Rect);
ImageList1.Draw(ComboBox1.Canvas, Rect.Left, Rect.Top, Index);
Combobox1.Canvas.TextOut(Rect.Left+ImageList1.Width+2,
  Rect.Top, ComboBox1.Items[Index]);

ComboBox1–>Canvas->FillRect( Rect );
ImageList1–>Draw( ComboBox1–>Canvas, Rect.Left, Rect.Top, Index );
ComboBox1–>Canvas->TextOut( Rect.Left + ImageList1–>Width + 2,
                            Rect.Top,
                            ComboBox1–>Items[Index] );

Pour exécuter le programme

1. Choisissez Exécuter > Exécuter. L'application s'exécute et affiche une fiche avec une boîte à options.
2. Cliquez sur la liste déroulante de la boîte à options.L'image bitmap et la chaîne de texte apparaissent en tant qu'élément de la liste.

Voir aussi

• Présentation de la VCL
• Comment construire une application Fiches VCL avec des graphiques