Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sort by
Message
 
 
À
07/09/2006 07:55:24
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01151579
Message ID:
01151711
Vues:
42
>Naomi --
>
>Following Thread #700704, as you directed, allowed me to create this little PRG
>
Lparameters lcPictureFileName
>Local lcResult
>
>Local loImage As GpImage Of ffc/_gdiplus.vcx
>loImage = Newobject("GpImage", Home() + "ffc/_gdiplus.vcx")
>loImage.CreateFromFile(lcPictureFileName)
>lcResult = loImage.GetPropertyItem(306)
>
>Return Ctot( "^" + Strtran(Left(lcResult,10), ":", "/") + Right(lcResult,9))
>
>
>Which returns "Date Picture Taken" for a JPG file ... Thanks
>
Glad to help and thanks for sharing.

BTW, should not be parameter tcPictureFileName? <g>
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