Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Images in drop down combo
Message
De
01/10/2004 07:11:40
 
 
À
01/10/2004 06:42:05
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00947860
Message ID:
00947867
Vues:
14
This message has been marked as a message which has helped to the initial question of the thread.
>Hi All,
>
>Is there a way to have images next to the items in a drop down list?
>
>Thanks

Jos,
I've never used them, but

Does this help ? http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dv_foxhelp/html/lngpicture_property.asp

You may have to add the pictures to the click()
&& vfp6 help
The following code is associated with the Click event of the list box:

FOR iItem = 5 TO THIS.ListCount      && files start at the 5th item
   cExtension = UPPER(RIGHT(THIS.List(iItem),3))
   DO CASE
      CASE cExtension = "DBF"
         THIS.Picture(iItem) = "tables.bmp"
      CASE cExtension = "BMP"
         THIS.Picture(iItem) = "other.bmp"
      CASE cExtension = "PRG"
         THIS.Picture(iItem) = "programs.bmp"
      CASE cExtension = "SCX"
         THIS.Picture(iItem) = "form.bmp"
      OTHERWISE 
         THIS.Picture(iItem) = IIF("]" $ cExtension, ;
            "", "textfile.bmp")
   ENDCASE
ENDFOR
Gregory
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform