Adobe 65014912 Scripting Guide - Page 65

Adobe Photoshop CS4 Visual Basic Scripting Reference, After viewing the document in Photoshop

Get Adobe 65014912 - Photoshop CS4 Extended PDF manuals and user guides
UPC - 883919160382
View all Adobe 65014912 manuals
Add to My Manuals
Save this manual to your list of manuals

Page 65 highlights

CHAPTER 3: Scripting Photoshop Advanced Scripting 65 VBS To create and specify details in a text item: 1. Type the following code into the HelloWorldDoc script immediately before the statements at the end of the file that restore original preferences. 'create a reference to the active (current) document Set docRef = appRef.ActiveDocument ' create a variable named textColor 'create a SolidColor object whose color is red 'assign the object to textColor Set textColor = CreateObject ("Photoshop.SolidColor") textColor.RGB.Red = 255 textColor.RGB.Green = 0 textColor.RGB.Blue = 0 'create an art layer object using the 'Add method of the ArtLayers class 'assign the layer to the variable newTextLayer Set newTextLayer = docRef.ArtLayers.Add() 'use the Kind property of the Art Layers class to 'make the layer a text layer newTextLayer.Kind = 2 newTextLayer.TextItem.Contents = helloWorldStr newTextLayer.TextItem.Position = Array(0.75, 1) newTextLayer.TextItem.Size = 36 newTextLayer.TextItem.Color = textColor 2. Run the complete script. Be patient while Photoshop executes your commands one by one. 3. After viewing the document in Photoshop, close the document without saving it. NOTE: Look up the following classes in the Adobe Photoshop CS4 Visual Basic Scripting Reference, or in the Visual Basic Object Browser to see if you understand how you used them in this script: ➤ SolidColor ➤ ArtLayer

  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31
  • 32
  • 33
  • 34
  • 35
  • 36
  • 37
  • 38
  • 39
  • 40
  • 41
  • 42
  • 43
  • 44
  • 45
  • 46
  • 47
  • 48
  • 49
  • 50
  • 51
  • 52
  • 53
  • 54
  • 55
  • 56
  • 57
  • 58
  • 59
  • 60
  • 61
  • 62
  • 63
  • 64
  • 65
  • 66
  • 67
  • 68
  • 69
  • 70
  • 71
  • 72
  • 73
  • 74
  • 75
  • 76
  • 77
  • 78
  • 79
  • 80
  • 81
  • 82
  • 83
  • 84
  • 85
  • 86
  • 87
C
HAPTER
3: Scripting Photoshop
Advanced Scripting
65
VBS
To create and specify details in a text item:
1.
Type the following code into the
HelloWorldDoc
script immediately before the statements at the end
of the file that restore original preferences.
'create a reference to the active (current) document
Set docRef = appRef.ActiveDocument
' create a variable named textColor
'create a SolidColor object whose color is red
'assign the object to textColor
Set textColor = CreateObject ("Photoshop.SolidColor")
textColor.RGB.Red = 255
textColor.RGB.Green = 0
textColor.RGB.Blue = 0
'create an art layer object using the
'Add method of the ArtLayers class
'assign the layer to the variable newTextLayer
Set newTextLayer = docRef.ArtLayers.Add()
'use the Kind property of the Art Layers class to
'make the layer a text layer
newTextLayer.Kind = 2
newTextLayer.TextItem.Contents = helloWorldStr
newTextLayer.TextItem.Position = Array(0.75, 1)
newTextLayer.TextItem.Size = 36
newTextLayer.TextItem.Color = textColor
2.
Run the complete script. Be patient while Photoshop executes your commands one by one.
3.
After viewing the document in Photoshop, close the document without saving it.
N
OTE
:
Look up the following classes in the
Adobe Photoshop CS4 Visual Basic Scripting Reference
, or in the
Visual Basic Object Browser to see if you understand how you used them in this script:
➤
SolidColor
➤
ArtLayer