Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
File association icons
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00728027
Message ID:
01045830
Vues:
37
Frank,

I'll answer here, if you don't mind.

SavePicture method sort of worked. E.g. it did create a file. However, this is not a true icon format. E.g. other icon files show its content in Windows Explorer, but this one showed the unknown type kind of icon in Windows Explorer. In my grid the saved file icon was shown, but it was not a good small icon, it looks like a big icon...

>>
>> I wish IconBuddy had Save2File method. But there is no such method
>> in the version I downloaded. May be it was a later revision which you
>> never published? I implemented other methods already, so now that important
>> method is missing...
>>
>
>
> Again, just a copy from our pm. So we have it in the UT
>
>hmm.... Yes, great! You are absolutely right. No Idea what I thought about that. I have the Method in the help file. So either I intended to implement it or I did, it crashed and I had do remove it...... I think I was able employ a native VFP function for it ........... yes, I think the idea was to use the SavePicture(, ) funktion that creates a bitmap. Either it did not work with the Icon-Object-Reference or I thought I could skip it in the class as it could be used directly.
>
>It's half past one in the morning here and I am dead tiered. Could You please give it a try. I'll see if I can look into it tomorrow, OK?
>
> ... and then in the moring ...
>
>Just tried it, and yes, it works. You can easily do:
>
>
>loIconSmall = .null.
>loIconLarge = .null.
>lcFile      = "C:\...."
>
>loIconBuddy.GetAssocIconPairObjects(lcFile, @loIconLarge, @loIconSmall)
>
>lcX = sys(2015) +".ico"
>= SavePicture("IconSmall"+ lcX, loIconSmall)
>= SavePicture("IconLarge"+ lcX, loIconLarge)
>
>
>whilst SavePicture is a VFP-function.
>
>Whish You a wonderful day
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform