Vai al contenuto
70MadMax

Photoshop VBScript

Recommended Posts

Ri-ciao...

Ora che ho trovato come fare la parte in Maya, sto impazzendo con la parte in photoshop...

Sto provando a creare una linea, semplicissima, per poi complicarla ;)

Purtroppo una volta creati i vari PathPointInfo e SubPathInfo e collegati,

vado ad aggiungere il tutto ai PathItems e...non va, l'errore dato è "argomento non valido", riferito all'array

di SubPathInfo...

Inoltre mi sono accorto di una cosa...non so come settare in pixel la dimensione del nuovo documento da me creato...ecco il codice(VBScript):

Option Explicit

Dim appRef

Dim docRef

Dim artLayerRef

Dim textColor

Set appRef = CreateObject( "Photoshop.Application" )

appRef.BringToFront

Set textColor = CreateObject( "Photoshop.SolidColor" )

textColor.RGB.Red = 0

textColor.RGB.Green = 0

textColor.RGB.Blue = 0

If appRef.Documents.Count > 0 Then

Set docRef = appRef.ActiveDocument

Else

Set docRef = appRef.Documents.Add( 1024,1024,72,"",2,3 )

End If

Set artLayerRef = docRef.ArtLayers.Add

Dim lineArray(2)

set lineArray(0) = CreateObject( "Photoshop.PathPointInfo" )

lineArray(0).kind = 1

lineArray(0).anchor = Array(100,100)

lineArray(0).leftDirection = lineArray(0).anchor

lineArray(0).rightDirection = lineArray(0).anchor

set lineArray(1) = CreateObject( "Photoshop.PathPointInfo" )

lineArray(1).kind = 1

lineArray(1).anchor = Array(150,200)

lineArray(1).leftDirection = lineArray(1).anchor

lineArray(1).rightDirection = lineArray(1).anchor

Dim lineSubPathArray(1)

set lineSubPathArray(0) = CreateObject( "Photoshop.SubPathInfo" )

lineSubPathArray(0).operation = 2

lineSubPathArray(0).closed = false

lineSubPathArray(0).entireSubPath = lineArray

Dim myPathItem

Set myPathItem = docRef.pathItems.add( "Mio", lineSubPathArray )

L'errore è proprio nell'ultima riga, non gli piace proprio...

Grazie ancora

Condividi questo messaggio


Link al messaggio
Condividi su altri siti

Crea un account o accedi per commentare

Devi essere un utente per poter lasciare un commento

Crea un account

Registrati per un nuovo account nella nostra comunità. è facile!

Registra un nuovo account

Accedi

Hai già un account? Accedi qui.

Accedi ora

  • Navigazione recente   0 utenti

    Non ci sono utenti registrati da visualizzare in questa pagina.

×