Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
File association icons
Message
De
01/09/2005 16:02:01
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00728027
Message ID:
01045999
Vues:
47
>>OK, I have just downloaded Alexander Golovlev's GDI+Image- class its download #18584 .
>>
>>With this at hand, all there is to do is:
>>
>>
>>ogpInit    = newobject("gpinit", "gpImage.prg")  && <-- needed as a basis for gpImage
>>ogpImage   = newobject("gpimage", "gpImage.prg")
>>oIconBuddy = newobject("iconbuddy", "iconbuddy")
>>
>>*-- vars for the Icons
>>oSmall     = null
>>oLarge     = null
>>
>>*-- get the icons for an Excel-File
>>? oIconBuddy.GetAssocIconPairObjects(getfile("xls"),@oLarge, @oSmall)
>>
>>*-- load the large Icon into the gpImage-Class
>>? ogpImage.FromPicture(oLarge)
>>
>>*-- And save it as a bitmap
>>? ogpImage.SaveAsBMP("XL_Large.bmp")
>>
>>*-- the small one too
>>? ogpImage.FromPicture(oSmall)
>>? ogpImage.SaveAsBMP("XL_Small.bmp")
>>
>>*-- And we're  D O N E ! !
>>
>>
>
>Terrific! :)) But I'm leaving soon. May be I'd have some time at night, let's hope...

Hi Naomi,

I haven't get in touch with VFP9 & XP-SP2. So I can't test your code yet. But it looks like Frank D's solved your problem already! Btw, you really should get some rest tonight <vbg>

Hi Frank,

Great job!
Herman
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform