EXIF laisse moi tranquil

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Ekim
Messages : 215
Inscription : dim. 24/juin/2018 1:20

EXIF laisse moi tranquil

Message par Ekim »

Bonsoir à tous :D

Comme vous l’aurez bien compris, j'ai un petit soucis avec les "métas donnés", les tags, Exif, etc.......
moi qui à pris goût à la liberté, j'aimerais me débarrasser une fois pour toute des ces donnés que Photoshop
inclut dans les sauvegardes de chaque créations

La question est donc la suivante,..
Il y aurait il une astuce à la manière BASIC de supprimer, écraser ou modifier ces fameuses donnés?

Je vous remercie, et je suis persuader que ce topic intéressera beaucoup de monde :lol:
Avatar de l’utilisateur
Thyphoon
Messages : 2697
Inscription : mer. 25/août/2004 6:31
Localisation : Eragny
Contact :

Re: EXIF laisse moi tranquil

Message par Thyphoon »

tu ne peux pas faire ça simplement avec Purebasic

tu as un outil très sympa et très puissant en ligne de commande qui s'appelle Exiftool
https://www.sno.phy.queensu.ca/~phil/exiftool/


j'ai écrit un Module pour Purebasic qui permet de l'utiliser simplement
https://www.purebasic.fr/french/viewtop ... =6&t=17554

Pour effacer toutes les métadonnées ...
En ligne de Commande

Code : Tout sélectionner

exiftool -all= mon fichier.jpg
Avec mon module

Code : Tout sélectionner

FileName="C:\Monimage.jpg"
Exiftool::Command("-all=")
;TODO This Toow Line are very Important to Support Path With Special Character Or You Will Have "File Not Found" Error.
Exiftool::Command("-charset")                   
Exiftool::Command("FILENAME=utf8")
Exiftool::Command(FileName.s)
Ei.i=Exiftool::Execute()
If Exiftool::WaitExecute(Ei,-1)=#True
    If Exiftool::GetResultStdErr(Ei)<>""
      Debug "You Have an Error:"+Exiftool::GetResultStdErr(Ei)
    Else
      Debug Exiftool::GetResultStdOut(Ei)
    Endif 
Endif 
Exiftool::FreeResult(Ei) ;TODO After take data clean used memory
pour retirer les tafs photoshop et garder les autres Iptc

Code : Tout sélectionner

exiftool -photoshop:all= -tagsfromfile @ -iptc:all monfichier.jpg
avec mon module et en purebasic

Code : Tout sélectionner

FileName="C:\Monimage.jpg"
Exiftool::Command("-photoshop:all=")
Exiftool::Command("-tagsfromfile @")
Exiftool::Command("-iptc:all")
;TODO This Toow Line are very Important to Support Path With Special Character Or You Will Have "File Not Found" Error.
Exiftool::Command("-charset")                   
Exiftool::Command("FILENAME=utf8")
Exiftool::Command(FileName.s)
Ei.i=Exiftool::Execute()
If Exiftool::WaitExecute(Ei,-1)=#True
    If Exiftool::GetResultStdErr(Ei)<>""
      Debug "You Have an Error:"+Exiftool::GetResultStdErr(Ei)
    Else
      Debug Exiftool::GetResultStdOut(Ei)
    Endif 
Endif 
Exiftool::FreeResult(Ei) ;TODO After take data clean used memory
J'ai tapé les codes sans pouvoir les vérifier... mais dans le principe c'est ça !
Ekim
Messages : 215
Inscription : dim. 24/juin/2018 1:20

Re: EXIF laisse moi tranquil

Message par Ekim »

Merci infiniment @Thyphoon :P
je vais examiner ça
ton idée est géniale, tu as en quelques sortes crée un paramettreur
le concepte est simple et classe :D

encore merci)
Répondre