[R] Photoshop: Obj PhotoshopSaveOptions

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
Avatar du membre
karime1
Niveau 5
Niveau 5
Messages : 106
Enregistré le : sam. 09 avr. 2011 10:05
Status : Hors ligne

[R] Photoshop: Obj PhotoshopSaveOptions

#1

Message par karime1 »

Bonjours,
depuis quelque jours j'essaye de faire un UDF pour photoshop CS5 c'est assez facile a vrais dire. il me suffit de créer l'obj "principal":

Code : Tout sélectionner

$oToshop = ObjCreate("Photoshop.Application")
et puis en se référant à un documents publié légalement je pe manier photoshop aisément.
enfin bref il y'a centaines variables stocké dans d'autre obj et qui sont essentiel, et dont: PhotoshopSaveOptions http://cssdk.host.adobe.com/sdk/1.0/doc ... hodSummary
je doit créer cette obj comme avec MediaPlayer (exemple extrait depuis la rubrique d'aide Autoit):

Code : Tout sélectionner

$oRemoteMedia = ObjCreate("MediaPlayer.MediaPlayer.1","name-of-remote-computer")
tout ce que je cherche à savoir c'est ce que je doit ecrire comme arg

si je n'arrive pas a sauvegarder un fichier tout l'UDF ne sévirait à rien.
merci pour tous vos réponses.
Modifié en dernier par karime1 le dim. 29 janv. 2012 15:29, modifié 1 fois.
ani
Niveau 11
Niveau 11
Messages : 1826
Enregistré le : lun. 23 juil. 2007 12:31
Localisation : Bureau
Status : Hors ligne

Re: [..] Photoshop: Obj PhotoshopSaveOptions

#2

Message par ani »

j'ai pas suivit quel argument tu parle :(

Pour le SaveOptions c'est un object donc à créer

Exemple

Code : Tout sélectionner

Dim $Document_Reference
Dim $Sortie = "c:\Teste_PhotoShop.psd"

Global $oPhotoshop_Application = ObjCreate("Photoshop.Application")
$Document_Reference = $oPhotoshop_Application.ActiveDocument
;Ou $Document_Reference = $oPhotoshop_Application.open("MONFichier")

; Sauvegarde des options.
Global $oPhotoshopSaveOptions = ObjCreate( "Photoshop.PhotoshopSaveOptions" )
$oPhotoshopSaveOptions.AlphaChannels = True
$oPhotoshopSaveOptions.Annotations = True
$oPhotoshopSaveOptions.Layers = True
$oPhotoshopSaveOptions.SpotColors = True
$Document_Reference.SaveAs($Sortie, $oPhotoshopSaveOptions, False, 3)

MsgBox(0,"PhotoShop","Sauvegarde Réussie")
$Document_Reference.SaveAs($Sortie, $oPhotoshopSaveOptions, False, 3)
le 3 Signifie Uppercase

Je ne dispose pas de photoshop, donc ne peut tester ^^"
Mais d'après la documentation çà doit être correct, si pas bein navré ;)
Avatar du membre
karime1
Niveau 5
Niveau 5
Messages : 106
Enregistré le : sam. 09 avr. 2011 10:05
Status : Hors ligne

Re: [..] Photoshop: Obj PhotoshopSaveOptions

#3

Message par karime1 »

ça devrai etre ça, mais ça marche pas!
je pense que le prob vien directement d'Autoit parce que ça marche bien avec VBScript. je vais utiliser celui la.
ani
Niveau 11
Niveau 11
Messages : 1826
Enregistré le : lun. 23 juil. 2007 12:31
Localisation : Bureau
Status : Hors ligne

Re: [R] Photoshop: Obj PhotoshopSaveOptions

#4

Message par ani »

SI ca ne fonctionne pas, remplace true ou false par leur valeur respective (1-0)
Défois c'est la cause ;)
Avatar du membre
karime1
Niveau 5
Niveau 5
Messages : 106
Enregistré le : sam. 09 avr. 2011 10:05
Status : Hors ligne

Re: [R] Photoshop: Obj PhotoshopSaveOptions

#5

Message par karime1 »

nan le problème viens directement de la fonction ObjCreate( "Photoshop.PhotoshopSaveOptions" )
avec vbscript, et en gardant le même argument, ça marche. alors qu'avec Autoit: @error !
Répondre