Corel PHOTO-PAINT 10 VBA Object Model

This file was automatically generated by Tlb2Html utility
Type library name: PHOTOPAINT
Description: Corel - Corel PHOTO-PAINT 10.0 Type Library
Version: 10.0
Tlb2Html utility İ Copyright 2000 by Alex Vakulenko

Index


Class AddinHook

Properties:

Events:

  • Event Execute()
  • Event New(ByVal NewDocument As Document)

Class AddIns

Properties:

  • Property Application As Application [r/o]
  • Property Collection As Object [r/o]
  • Property Parent As Application [r/o]

Methods:

  • Function Attach(ByVal Filter As pntAddinFilter, [ByVal ExecuteCommandPrompt As String]) As AddinHook
  • Sub Detach(ByVal pAddinHook As AddinHook)
  • Sub DetachAll()

Class Application

Properties:

  • Property ActiveDocument As Document [r/o]
  • Property ActiveFrame As Frame [r/o]
  • Property ActiveLayer As Layer [r/o]
  • Property ActivePalette As Palette [r/o]
  • Property ActiveWindow As Window [r/o]
  • Property ActiveWorkspace As Workspace [r/o]
  • Property AddIns As AddIns [r/o]
  • Property Application As Application [r/o]
  • Property AppWindow As AppWindow [r/o]
  • Property Clipboard As Clipboard [r/o]
  • Property ConfigPath As String [r/o]
  • Property Documents As Documents [r/o]
  • Property EventsEnabled As Boolean [r/w]
  • Property PaintColor As Color [r/w]
  • Property Palettes As Palettes [r/o]
  • Property PaperColor As Color [r/w]
  • Property Parent As Application [r/o]
  • Property Path As String [r/o]
  • Property SetupPath As String [r/o]
  • Property VBE As Object [r/o]
  • Property Version As String [r/o]
  • Property VersionBuild As Long [r/o]
  • Property VersionMajor As Long [r/o]
  • Property VersionMinor As Long [r/o]
  • Property Visible As Boolean [r/w]
  • Property Windows As Windows [r/o]
  • Property Workspaces As Workspaces [r/o]

Methods:

  • Function CombineChannels(ByVal Mode As pntSplitMode, ByVal Channel1 As Document, ByVal Channel2 As Document, ByVal Channel3 As Document, [ByVal Channel4 As Document = 0], [ByVal CloseOriginals As Boolean = True], [ByVal Name As String]) As Document
  • Function CorelScript() As Object
  • Function CorelScriptTools() As Object
  • Function CreateBWColor(ByVal White As Boolean) As Color
  • Function CreateCMYColor(ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long) As Color
  • Function CreateCMYKColor(ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long) As Color
  • Function CreateColor() As Color
  • Function CreateColorEx([ByVal Model As Long = 0], [ByVal c1 As Long = 0], [ByVal c2 As Long = 0], [ByVal c3 As Long = 0], [ByVal c4 As Long = 0], [ByVal c5 As Long = 0], [ByVal c6 As Long = 0], [ByVal c7 As Long = 0]) As Color
  • Function CreateDocument(ByVal Width As Long, ByVal Height As Long, [ByVal Mode As cdrImageMode = cdrImageRGB (0)], [ByVal HRes As Long = 72], [ByVal VRes As Long = 72], [ByVal HasBackground As Boolean = True], [ByVal BackColor As Color = 0], [ByVal Movie As Boolean = False], [ByVal MovieFrames As Long = 1]) As Document
  • Function CreateFixedColor(ByVal PaletteID As cdrPaletteID, ByVal PaletteIndex As Long, [ByVal Tint As Long = 100]) As Color
  • Function CreateGrayColor(ByVal GrayValue As Long) As Color
  • Function CreateHLSColor(ByVal Hue As Long, ByVal Lightness As Long, ByVal Saturation As Long) As Color
  • Function CreateHSBColor(ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long) As Color
  • Function CreateLabColor(ByVal L As Long, ByVal A As Long, ByVal B As Long) As Color
  • Function CreateRegistrationColor() As Color
  • Function CreateRGBColor(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long) As Color
  • Function CreateYIQColor(ByVal Y As Long, ByVal I As Long, ByVal Q As Long) As Color
  • Function OpenCorelScriptFile(ByVal FileName As String) As CorelScriptFile
  • Function OpenDocument(ByVal FileName As String, [ByVal Filter As cdrFilter = cdrAutoSense (0)], [ByVal LoadMode As pntLoadMode = pntLoadAll (0)], [ByVal Left As Long = 0], [ByVal Top As Long = 0], [ByVal Width As Long = 0], [ByVal Height As Long = 0], [ByVal DpiX As Long = 72], [ByVal DpiY As Long = 72], [ByVal StartFrame As Long = 1], [ByVal EndFrame As Long = 0]) As Document
  • Sub Quit()

Class AppWindow

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Object [r/o]
  • Property Caption As String [r/w]
  • Property ClientHeight As Long [r/o]
  • Property ClientWidth As Long [r/o]
  • Property Handle As Long [r/o]
  • Property Height As Long [r/w]
  • Property Left As Long [r/w]
  • Property Parent As Object [r/o]
  • Property Top As Long [r/w]
  • Property Width As Long [r/w]
  • Property WindowState As cdrWindowState [r/w]

Methods:

  • Sub Activate()

Class Background

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Application [r/o]
  • Property Parent As Document [r/o]

Methods:

  • Sub Activate()
  • Sub Clear([ByVal Color As Color = 0])
  • Function ConvertToLayer([ByVal Name As String], [ByVal Opacity As Long = 100], [ByVal MergeMode As pntMergeMode = pntMergeNormal (0)]) As Layer
  • Sub Copy()
  • Sub Cut([ByVal Color As Color = 0])

Class Channel

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Application [r/o]
  • Property Color As Color [r/w]
  • Property Index As Long [r/w]
  • Property InvertOverlay As Boolean [r/w]
  • Property Name As String [r/w]
  • Property Opacity As Long [r/w]
  • Property Parent As Document [r/o]
  • Property Visible As Boolean [r/w]

Methods:

  • Sub Activate()
  • Sub CreateMask([ByVal MaskMode As pntMaskMode = pntMaskNormal (0)], [ByVal InvertMask As Boolean = False])
  • Sub Delete()
  • Sub StoreMask()

Class Channels

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Channel [r/o] [default]
  • Property Parent As Document [r/o]

Methods:

  • Function Add([ByVal Name As String], [ByVal Opacity As Long = 50], [ByVal Color As Color = 0], [ByVal InvertOverlay As Boolean = False], [ByVal FillWithBlack As Boolean = True]) As Channel
  • Function AddFromColorMask(ByVal ColorMask As ColorMask, [ByVal Name As String], [ByVal Opacity As Long = 50], [ByVal Color As Color = 0], [ByVal InvertOverlay As Boolean = False]) As Channel
  • Function Load(ByVal FileName As String, [ByVal Filter As cdrFilter = cdrAutoSense (0)], [ByVal LoadMode As pntLoadMode = pntLoadAll (0)], [ByVal Left As Long = 0], [ByVal Top As Long = 0], [ByVal Width As Long = 0], [ByVal Height As Long = 0]) As Channel

Class Clipboard

Properties:

  • Property Application As Object [r/o]
  • Property Empty As Boolean [r/o]
  • Property Parent As Object [r/o]
  • Property Valid As Boolean [r/o]

Methods:

  • Sub Clear()
  • Function DataPresent(ByVal FormatName As String) As Boolean

Class ClipMask

Properties:

  • Property Application As Application [r/o]
  • Property Linked As Boolean [r/w]
  • Property Parent As Document [r/o]
  • Property Visible As Boolean [r/w]

Methods:

  • Sub Apply()
  • Sub Delete()

Class Color

Properties:

  • Property Application As Object [r/o]
  • Property BW As Boolean [r/w]
  • Property CMYCyan As Long [r/w]
  • Property CMYKBlack As Long [r/w]
  • Property CMYKCyan As Long [r/w]
  • Property CMYKMagenta As Long [r/w]
  • Property CMYKYellow As Long [r/w]
  • Property CMYMagenta As Long [r/w]
  • Property CMYYellow As Long [r/w]
  • Property Gray As Long [r/w]
  • Property HLSHue As Long [r/w]
  • Property HLSLightness As Long [r/w]
  • Property HLSSaturation As Long [r/w]
  • Property HSBBrightness As Long [r/w]
  • Property HSBHue As Long [r/w]
  • Property HSBSaturation As Long [r/w]
  • Property LabComponentA As Long [r/w]
  • Property LabComponentB As Long [r/w]
  • Property LabLuminance As Long [r/w]
  • Property Name([ByVal Components As Boolean = False]) As String [r/o]
  • Property PaletteID As cdrPaletteID [r/o]
  • Property PaletteIndex As Long [r/w]
  • Property Parent As Object [r/o]
  • Property RGBBlue As Long [r/w]
  • Property RGBGreen As Long [r/w]
  • Property RGBRed As Long [r/w]
  • Property Tint As Long [r/w]
  • Property Type As cdrColorType [r/o]
  • Property YIQChromaI As Long [r/w]
  • Property YIQChromaQ As Long [r/w]
  • Property YIQLuminanceY As Long [r/w]

Methods:

  • Sub BWAssign(ByVal White As Boolean)
  • Sub CMYAssign(ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long)
  • Sub CMYKAssign(ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long)
  • Sub ConvertToBW()
  • Sub ConvertToCMY()
  • Sub ConvertToCMYK()
  • Sub ConvertToFixed(ByVal PaletteID As cdrPaletteID)
  • Sub ConvertToGray()
  • Sub ConvertToHLS()
  • Sub ConvertToHSB()
  • Sub ConvertToLab()
  • Sub ConvertToRGB()
  • Sub ConvertToYIQ()
  • Sub CopyAssign(ByVal Color As Color)
  • Sub CorelScriptAssign(ByVal ColorModel As Long, ByVal V1 As Long, [ByVal V2 As Long = 0], [ByVal V3 As Long = 0], [ByVal V4 As Long = 0], [ByVal V5 As Long = 0], [ByVal V6 As Long = 0], [ByVal V7 As Long = 0])
  • Sub CorelScriptGetComponent(ByRef ColorModel As Long, ByRef V1 As Long, [ByRef V2 As Long = 0], [ByRef V3 As Long = 0], [ByRef V4 As Long = 0], [ByRef V5 As Long = 0], [ByRef V6 As Long = 0], [ByRef V7 As Long = 0])
  • Sub FixedAssign(ByVal PaletteID As cdrPaletteID, ByVal PaletteIndex As Long, [ByVal Tint As Long = 100])
  • Sub GrayAssign(ByVal GrayValue As Long)
  • Sub HLSAssign(ByVal Hue As Long, ByVal Lightness As Long, ByVal Saturation As Long)
  • Sub HSBAssign(ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub LabAssign(ByVal L As Long, ByVal A As Long, ByVal B As Long)
  • Sub RegistrationAssign()
  • Sub RGBAssign(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long)
  • Sub UserAssign()
  • Function UserAssignEx() As Boolean
  • Sub YIQAssign(ByVal Y As Long, ByVal I As Long, ByVal Q As Long)

Class ColorMask

Properties:

Methods:

  • Sub AddColor(ByVal Color As Color, [ByVal Normal As Long = 0], [ByVal Hue As Long = 0], [ByVal Saturation As Long = 0], [ByVal Brightness As Long = 0])
  • Sub Reset([ByVal Type As pntColorMaskType = pntColorMaskSampledColors (0)], [ByVal Smoothing As Long = 0], [ByVal Inverted As Boolean = False], [ByVal Mode As pntColorMaskMode = pntColorMaskNormal (0)], [ByVal Threshold As Long = 127], [ByVal BrightnessModel As pntMaskBrightnessModel = pntMaskToBlack (1)])

Class ColorMaskColor

Properties:

  • Property Application As Application [r/o]
  • Property Brightness As Long [r/w]
  • Property Color As Color [r/w]
  • Property Hue As Long [r/w]
  • Property Normal As Long [r/w]
  • Property Parent As Application [r/o]
  • Property Saturation As Long [r/w]

Methods:

  • Sub Delete()

Class ColorMaskColors

Properties:

Methods:


Class Colors

Properties:

  • Property Application As Object [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Color [r/o] [default]
  • Property Parent As Palette [r/o]

Class ColorTable

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Color [r/w] [default]
  • Property Parent As Document [r/o]

Methods:

  • Sub AddColor(ByVal Color As Color)
  • Function GetIndexOfColor(ByVal Color As Color) As Long
  • Sub LoadPalette(ByVal Palette As Palette)
  • Sub LoadPaletteFromFile(ByVal FileName As String)
  • Sub Sort(ByVal Method As cdrPaletteSortMethod)

Class CorelScript

Methods:

  • Sub AdjustEffectInfo(ByVal EffectID As Long, ByVal Value1 As Long, ByVal Value2 As Long, ByVal Value3 As Long)
  • Sub AlphaOrder(ByVal CurrentIndex As Long, ByVal NewIndex As Long)
  • Sub BindToActiveDocument()
  • Sub BitmapEffect(ByVal Name As String, ByVal Parameters As String)
  • Sub BrushDabSettings(ByVal Dabs As Long, ByVal Spacing As Long, ByVal Spread As Long, ByVal FadeOut As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Luminance As Long)
  • Sub BrushOrbitSettings(ByVal Points As Long, ByVal Radius As Long, ByVal Rotation As Long, ByVal GrowRate As Long, ByVal GrowScale As Long, ByVal Center As Boolean, ByVal Clockwise As Boolean, ByVal ColorHue As Long, ByVal ColorSaturation As Long, ByVal ColorLightness As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Lightness As Long)
  • Sub BrushSettings(ByVal ToolID As Long, ByVal BrushID As Long, ByVal TypeID As Long, ByVal MergeMode As Long, ByVal Amount As Long, ByVal NibShape As Long, ByVal Size As Long, ByVal Transparency As Long, ByVal Rotate As Long, ByVal Flatten As Long, ByVal SoftEdge As Long)
  • Sub BrushTextureSettings(ByVal TextureFile As String, ByVal BrushTexture As Long, ByVal EdgeTexture As Long, ByVal Bleed As Long, ByVal SustainColor As Long, ByVal Smoothing As Long, ByVal AntiAlias As Boolean, ByVal Cumulative As Boolean, ByVal Range As Long, ByVal MergedSource As Boolean)
  • Sub BrushTool(ByVal BrushID As Long, ByVal TypeID As Long, ByVal MergeMode As Long, ByVal Amount As Long, ByVal NibShape As Long, ByVal Size As Long, ByVal Transparency As Long, ByVal Rotate As Long, ByVal Flatten As Long, ByVal SoftEdge As Long)
  • Sub ChannelNew(ByVal Name As String, ByVal Opacity As Long, ByVal Invert As Long, ByVal FillWhite As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ChannelProperties(ByVal ChannelID As Long, ByVal Name As String, ByVal Opacity As Long, ByVal Invert As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub CloneTool(ByVal BrushID As Long, ByVal TypeID As Long, ByVal MergeMode As Long, ByVal Amount As Long, ByVal NibShape As Long, ByVal Size As Long, ByVal Transparency As Long, ByVal Rotate As Long, ByVal Flatten As Long, ByVal SoftEdge As Long)
  • Sub ColorMaskApply(ByVal MaskMode As Long, ByVal Smoothing As Long, ByVal ToleranceMode As Long)
  • Sub ColorMaskColor(ByVal Number As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub ColorMaskCreateChannel(ByVal MaskMode As Long, ByVal Smoothing As Long, ByVal ToleranceMode As Long, ByVal Gamut As Boolean, ByVal Threshold As Long, ByVal BrightnessModel As Long, ByVal Name As String)
  • Sub ColorMaskCreateMask(ByVal DrawMode As Long, ByVal MaskMode As Long, ByVal Smoothing As Long, ByVal ToleranceMode As Long, ByVal Gamut As Boolean, ByVal Threshold As Long, ByVal BrightnessModel As Long)
  • Sub ColorMaskReset()
  • Sub ColorReplace(ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub ColorReplacerTool(ByVal Width As Long, ByVal Flatten As Long, ByVal Rotate As Long, ByVal NibShape As Long, ByVal Transparency As Long, ByVal SoftEdge As Long, ByVal AntiAlias As Long)
  • Sub ContinueDraw(ByVal X As Long, ByVal Y As Long, ByVal Timer As Long, ByVal Pressure As Long, ByVal Tilt As Long, ByVal Rotate As Long)
  • Sub CreateBackground(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub DuotoneHandle(ByVal ToneNumber As Long, ByVal HandleNumber As Long, ByVal X As Long, ByVal Y As Long)
  • Sub DuotoneInfo(ByVal ToneNumber As Long, ByVal Handles As Long, ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long)
  • Sub EditCheckpoint()
  • Sub EditClear(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EditClearClipboard()
  • Sub EditCopy()
  • Sub EditCopyToFile(ByVal FileName As String, ByVal FilterID As Long, ByVal Compression As Long)
  • Sub EditCopyVisible()
  • Sub EditCut(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EditCutIntoSelection()
  • Sub EditCutMask(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EditCutSelection()
  • Sub EditFill(ByVal MergeMode As Long, ByVal StartTransparency As Long, ByVal EndTransparency As Long, ByVal GradientType As Long, ByVal Handles As Long, ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal x3 As Long, ByVal y3 As Long)
  • Sub EditPasteDocument()
  • Sub EditPasteFromFile(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long, ByVal X As Long, ByVal Y As Long)
  • Sub EditPasteIntoSelection(ByVal FileName As String)
  • Sub EditPasteObject(ByVal X As Long, ByVal Y As Long, ByVal FileName As String)
  • Sub EditPasteSelection(ByVal X As Long, ByVal Y As Long, ByVal FileName As String)
  • Sub EditRestoreCheckpoint()
  • Sub EditUndo()
  • Sub Effect3DRotate(ByVal Horizontal As Long, ByVal Vertical As Long, ByVal Face As Long, ByVal BestFit As Boolean)
  • Sub Effect3DStereoNoise(ByVal Depth As Long, ByVal Dots As Boolean)
  • Sub EffectAdaptiveUnsharp(ByVal Percentage As Long)
  • Sub EffectAddNoise(ByVal Level As Long, ByVal Density As Long, ByVal ColorNoise As Boolean, ByVal NoiseType As Long, ByVal ColorMode As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectAdjustBlur()
  • Sub EffectAdjustNoise()
  • Sub EffectAdjustSharpness()
  • Sub EffectAlchemy(ByVal FileName As String, ByVal Layer As Long, ByVal Density As Long, ByVal Rand As Long, ByVal HPosV As Long, ByVal VPosV As Long, ByVal BrushClr As Boolean, ByVal BackClr As Boolean, ByVal ClrModel As Long, ByVal ClrP1 As Long, ByVal ClrP2 As Long, ByVal ClrP3 As Long, ByVal ClrP4 As Long, ByVal ClrMode2 As Long, ByVal ClrP5 As Long, ByVal ClrP6 As Long, ByVal ClrP7 As Long, ByVal ClrP8 As Long, ByVal HueV As Long, ByVal SatV As Long, ByVal BrtV As Long, ByVal BrushSize As Long, ByVal Size1 As Long, ByVal Size2 As Long, ByVal SizeV As Long, ByVal BrushAngle As Long, ByVal Angle1 As Long, ByVal Angle2 As Long, ByVal AngleV As Long, ByVal BrushTrans As Long, ByVal Trans1 As Long, ByVal Trans2 As Long, ByVal TransV As Long, ByVal Dx As Double, ByVal Dy As Double)
  • Sub EffectBandPass(ByVal InRadius As Long, ByVal OutRadius As Long, ByVal InBand As Long, ByVal MidBand As Long, ByVal OutBand As Long)
  • Sub EffectBitPlanes(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long)
  • Sub EffectBrickWall(ByVal Roughness As Long, ByVal BrickWidth As Long, ByVal BrickHeight As Long, ByVal GroutWidth As Long, ByVal Direction As Long)
  • Sub EffectBubbles(ByVal Diameter As Long, ByVal Coverage As Long, ByVal Direction As Long, ByVal Refraction As Long, ByVal Seed As Long)
  • Sub EffectBumpMap(ByVal FileName As String, ByVal Mode As Long, ByVal TileWidth As Long, ByVal TileHeight As Long, ByVal Floor As Long, ByVal Ceiling As Long, ByVal ScaleFactor As Long, ByVal Highlight As Long, ByVal Invert As Boolean, ByVal Smooth As Boolean, ByVal AmbientBrightness As Long, ByVal AmbientColorModel As Long, ByVal AmbientColor1 As Long, ByVal AmbientColor2 As Long, ByVal AmbientColor3 As Long, ByVal AmbientColor4 As Long, ByVal DirectionalBrightness As Long, ByVal DirectionalColorModel As Long, ByVal DirectionalColor1 As Long, ByVal DirectionalColor2 As Long, ByVal DirectionalColor3 As Long, ByVal DirectionalColor4 As Long, ByVal Direction As Long, ByVal Declination As Long)
  • Sub EffectCanvas(ByVal FileName As String, ByVal Transparency As Long, ByVal Emboss As Long, ByVal X As Long, ByVal Y As Long, ByVal Mode As Long, ByVal Offset As Long)
  • Sub EffectCharcoal(ByVal Size As Long, ByVal Edge As Long)
  • Sub EffectCobblestone(ByVal Roughness As Long, ByVal Size As Long, ByVal GroutWidth As Long, ByVal Direction As Long, ByVal Warp As Boolean)
  • Sub EffectConteCrayon(ByVal ConteColor As Long, ByVal Pressure As Long, ByVal Texture As Long, ByVal Type As Long, ByVal Comp1 As Long, ByVal Comp2 As Long, ByVal Comp3 As Long, ByVal Comp4 As Long)
  • Sub EffectCraft(ByVal Style As Long, ByVal Complete As Long, ByVal Brightness As Long, ByVal Size As Long, ByVal Rotation As Long)
  • Sub EffectCrayon(ByVal Size As Long, ByVal Outline As Long)
  • Sub EffectCrystalize(ByVal Size As Long)
  • Sub EffectCubist(ByVal Size As Long, ByVal Brightness As Long, ByVal Type As Long, ByVal Comp1 As Long, ByVal Comp2 As Long, ByVal Comp3 As Long, ByVal Comp4 As Long)
  • Sub EffectCylinder(ByVal Mode As Long, ByVal Percentage As Long)
  • Sub EffectDabble(ByVal Distribution As Long, ByVal Style As Long, ByVal Size As Long)
  • Sub EffectDiffuse(ByVal Level As Long)
  • Sub EffectDirectionalSharpen(ByVal Percentage As Long)
  • Sub EffectDirectionalSmooth(ByVal Percentage As Long)
  • Sub EffectDisplace(ByVal FileName As String, ByVal Displacement As Long, ByVal Edges As Long, ByVal Horizontal As Long, ByVal Vertical As Long)
  • Sub EffectDustScratch(ByVal Level As Long, ByVal Radius As Long)
  • Sub EffectEdgeDetect(ByVal Sensitivity As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectElephantSkin(ByVal Age As Long, ByVal Variation As Long, ByVal Type As Long, ByVal Comp1 As Long, ByVal Comp2 As Long, ByVal Comp3 As Long, ByVal Comp4 As Long)
  • Sub EffectEmboss(ByVal Depth As Long, ByVal Level As Long, ByVal Direction As Long, ByVal Color As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectEtching(ByVal Detail As Long, ByVal Depth As Long, ByVal Direction As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectFabric(ByVal Style As Long, ByVal Complete As Long, ByVal Brightness As Long, ByVal Size As Long, ByVal Rotation As Long)
  • Sub EffectFindEdges(ByVal Level As Long, ByVal EdgeType As Long)
  • Sub EffectFrame()
  • Sub EffectFrameSettings(ByVal Number As Long, ByVal FileName As String, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal PosX As Double, ByVal PosY As Double, ByVal Opacity As Long, ByVal Fade As Long, ByVal Horizontal As Long, ByVal Vertical As Long, ByVal Angle As Long, ByVal HFlip As Long, ByVal VFlip As Long, ByVal BlendMode As Long, ByVal UseImage As Long, ByVal UsePath As Long)
  • Sub EffectGaussianBlur(ByVal Radius As Double)
  • Sub EffectGlass(ByVal Angle As Long, ByVal BevelWidth As Long, ByVal Brightness As Long, ByVal Direction As Long, ByVal Dropoff As Long, ByVal Opacity As Long, ByVal Refraction As Long, ByVal Sharpness As Long, ByVal Smooth As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectGlassBlock(ByVal Width As Long, ByVal Height As Long)
  • Sub EffectHalftone(ByVal Radius As Long, ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long)
  • Sub EffectHighPass(ByVal Radius As Long, ByVal Percentage As Long)
  • Sub EffectImpressionist(ByVal Style As Long, ByVal Detail As Long, ByVal Coloration As Long, ByVal Brightness As Long)
  • Sub EffectJaggyDespeckle(ByVal Width As Long, ByVal Height As Long)
  • Sub EffectKidsplay(ByVal Game As Long, ByVal Complete As Long, ByVal Brightness As Long, ByVal Size As Long, ByVal Rotation As Long)
  • Sub EffectLensFlare(ByVal X As Double, ByVal Y As Double, ByVal Brightness As Long, ByVal LensType As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectLighting(ByVal Sources As Long)
  • Sub EffectLightSource(ByVal Index As Long, ByVal X As Double, ByVal Y As Double, ByVal Type As Long, ByVal Height As Long, ByVal Direction As Long, ByVal Elevation As Long, ByVal Intensity As Long, ByVal Aperture As Long, ByVal Focus As Long, ByVal Whiteness As Long, ByVal Exposure As Long, ByVal Channel As Long, ByVal Depth As Long, ByVal Contrast As Long, ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long, ByVal Switch As Long)
  • Sub EffectLocalHistogram(ByVal Width As Long, ByVal Height As Long)
  • Sub EffectLowPass(ByVal Radius As Long, ByVal Percentage As Long)
  • Sub EffectMapToObject(ByVal Mode As Long, ByVal Percentage As Long, ByVal Quality As Long)
  • Sub EffectMaximum(ByVal Radius As Long, ByVal Percentage As Long)
  • Sub EffectMedian(ByVal Radius As Long, ByVal Percentage As Long)
  • Sub EffectMeshPoint(ByVal Row As Long, ByVal Column As Long, ByVal X As Double, ByVal Y As Double)
  • Sub EffectMeshWarp(ByVal Width As Long, ByVal Height As Long)
  • Sub EffectMinimum(ByVal Radius As Long, ByVal Percentage As Long)
  • Sub EffectMosaic(ByVal Size As Long, ByVal Vignette As Long, ByVal Type As Long, ByVal Comp1 As Long, ByVal Comp2 As Long, ByVal Comp3 As Long, ByVal Comp4 As Long)
  • Sub EffectMotionBlur(ByVal Speed As Long, ByVal Direction As Long, ByVal Method As Long)
  • Sub EffectOffset(ByVal Horizontal As Long, ByVal Vertical As Long, ByVal Shift As Boolean, ByVal Edges As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectPageCurl(ByVal Corner As Long, ByVal Direction As Boolean, ByVal Width As Long, ByVal Height As Long, ByVal Opaque As Boolean, ByVal CurlColorModel As Long, ByVal CurlColor1 As Long, ByVal CurlColor2 As Long, ByVal CurlColor3 As Long, ByVal CurlColor4 As Long, ByVal BackColorModel As Long, ByVal BackColor1 As Long, ByVal BackColor2 As Long, ByVal BackColor3 As Long, ByVal BackColor4 As Long)
  • Sub EffectPaletteKnife(ByVal BladeSize As Long, ByVal SoftEdge As Long, ByVal Angle As Long)
  • Sub EffectParticle(ByVal Style As Long, ByVal Size As Long, ByVal Density As Long, ByVal Coloration As Long, ByVal Transparency As Long, ByVal Angle As Long)
  • Sub EffectPastels(ByVal Type As Long, ByVal Size As Long, ByVal Hue As Long)
  • Sub EffectPenInk(ByVal Style As Long, ByVal Density As Long, ByVal Inkpool As Long)
  • Sub EffectPerspective(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal x3 As Double, ByVal y3 As Double, ByVal x4 As Double, ByVal y4 As Double, ByVal BestFit As Boolean)
  • Sub EffectPinchPunch(ByVal Level As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub EffectPixelate(ByVal Width As Long, ByVal Height As Long, ByVal Opacity As Long, ByVal Mode As Long)
  • Sub EffectPlasterWall(ByVal Detail As Long, ByVal Variation As Long, ByVal Brightness As Long)
  • Sub EffectPlastic(ByVal Highlight As Long, ByVal Depth As Long, ByVal Smoothness As Long, ByVal Direction As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectPlugin(ByVal GroupName As String, ByVal EffectName As String, ByVal MemoryType As Long, ByVal MemorySize As Long, ByVal Parameters As String)
  • Sub EffectPointillist(ByVal Size As Long, ByVal Brightness As Long)
  • Sub EffectPsychedelic(ByVal Level As Long)
  • Sub EffectPuzzle(ByVal Width As Long, ByVal Height As Long, ByVal Offset As Long, ByVal Fill As Long, ByVal RandSeed As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectRadialBlur(ByVal Radius As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub EffectReliefSculpture(ByVal Detail As Long, ByVal Depth As Long, ByVal Smoothness As Long, ByVal Direction As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectRemoveMoire(ByVal Level As Long, ByVal Mode As Long, ByVal FinalRes As Long, ByVal OriginalRes As Long)
  • Sub EffectRemoveNoise(ByVal Threshold As Long, ByVal Auto As Boolean)
  • Sub EffectRipple(ByVal Period As Long, ByVal Amplitude As Long, ByVal Angle As Long, ByVal Distort As Boolean, ByVal Mode As Long)
  • Sub EffectScatter(ByVal Horizontal As Long, ByVal Vertical As Long)
  • Sub EffectScraperboard(ByVal Style As Long, ByVal Density As Long, ByVal Size As Long)
  • Sub EffectScreenDoor(ByVal Background As Long, ByVal MeshDensity As Long, ByVal Softness As Long, ByVal Brightness As Long)
  • Sub EffectSharpen(ByVal EdgeLevel As Long, ByVal Threshold As Long, ByVal Intensity As Boolean)
  • Sub EffectShear(ByVal Scale As Long, ByVal Border As Long, ByVal Orientation As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectShearTable(ByVal Number As Long, ByVal Value As Long)
  • Sub EffectSketchPad(ByVal Type As Long, ByVal Style As Long, ByVal Outline As Long, ByVal Lead As Long)
  • Sub EffectSmokedGlass(ByVal Tint As Long, ByVal Percent As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectSmooth(ByVal Percentage As Long)
  • Sub EffectSoften(ByVal Percentage As Long)
  • Sub EffectSolarize(ByVal Level As Long)
  • Sub EffectSphere(ByVal Percentage As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub EffectStainedGlass(ByVal Size As Long, ByVal Thickness As Long, ByVal Lighting As Boolean, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectStone(ByVal Roughness As Long, ByVal Detail As Long, ByVal Invert As Boolean, ByVal Direction As Long)
  • Sub EffectSwirl(ByVal Angle As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub EffectTheBoss(ByVal Angle As Long, ByVal BevelWidth As Long, ByVal BevelHeight As Long, ByVal Brightness As Long, ByVal Direction As Long, ByVal Dropoff As Long, ByVal Sharpness As Long, ByVal Smooth As Long, ByVal Invert As Boolean)
  • Sub EffectTile(ByVal Horizontal As Long, ByVal Vertical As Long)
  • Sub EffectTool(ByVal BrushID As Long, ByVal TypeID As Long, ByVal MergeMode As Long, ByVal Amount As Long, ByVal NibShape As Long, ByVal Size As Long, ByVal Transparency As Long, ByVal Rotate As Long, ByVal Flatten As Long, ByVal SoftEdge As Long)
  • Sub EffectTraceContour(ByVal Level As Long, ByVal EdgeType As Long)
  • Sub EffectUnderpainting(ByVal Amount As Long, ByVal Brightness As Long)
  • Sub EffectUnsharpMask(ByVal Radius As Long, ByVal Percentage As Long, ByVal Threshold As Long)
  • Sub EffectUserDefined(ByVal Divisor As Long, ByVal Offset As Long, ByVal Intensity As Boolean)
  • Sub EffectUserDefinedPoint(ByVal Index As Long, ByVal Value As Long)
  • Sub EffectVignette(ByVal Shape As Long, ByVal Offset As Long, ByVal Fade As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub EffectVortex(ByVal Style As Long, ByVal Inner As Long, ByVal Outer As Long, ByVal Size As Long, ByVal XCenter As Long, ByVal YCenter As Long)
  • Sub EffectWatercolor(ByVal Size As Long, ByVal Bleed As Long, ByVal Granulation As Long, ByVal WaterAmount As Long, ByVal Brightness As Long)
  • Sub EffectWaterMarker(ByVal Mode As Long, ByVal Coloration As Long, ByVal Size As Long)
  • Sub EffectWavePaper(ByVal Pressure As Long, ByVal ColorMode As Long)
  • Sub EffectWeather(ByVal Forecast As Long, ByVal Strength As Long, ByVal Size As Long, ByVal Variation As Long, ByVal Direction As Long)
  • Sub EffectWetPaint(ByVal Wetness As Long, ByVal Percentage As Long)
  • Sub EffectWhirlpool(ByVal Spacing As Long, ByVal Smear As Long, ByVal Twist As Long, ByVal Streak As Long, ByVal Warp As Boolean)
  • Sub EffectWind(ByVal Strength As Long, ByVal Opacity As Long, ByVal Direction As Long)
  • Sub EffectZigZag(ByVal Waves As Long, ByVal Strength As Long, ByVal Damping As Long, ByVal Type As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub EffectZoom(ByVal Radius As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Sub Ellipse(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long)
  • Sub EllipseTool(ByVal Width As Long, ByVal Transparency As Long, ByVal MergeMode As Long, ByVal AntiAlias As Boolean, ByVal RenderObject As Boolean, ByVal Fill As Boolean)
  • Sub EndAdjustEffect()
  • Sub EndColorEffect()
  • Sub EndColorMask()
  • Sub EndColorReplace()
  • Sub EndColorTable()
  • Sub EndConvertDuotone()
  • Sub EndConvertPaletted()
  • Sub EndDraw()
  • Sub EndEditFill()
  • Sub EndEffectFrame()
  • Sub EndEffectLighting()
  • Sub EndEffectMeshWarp()
  • Sub EndEffectShear()
  • Sub EndEffectUserDefined()
  • Sub EndGuideline()
  • Sub EndImageEqualize()
  • Sub EndImageSTBalance()
  • Sub EndImageToneCurve()
  • Sub EndMaskCreate()
  • Sub EndMovieFrameRate()
  • Sub EndObject()
  • Sub EndObjectColorTransparencyTool()
  • Sub EndObjectTagWWWURL()
  • Sub Eraser(ByVal Width As Long, ByVal Flatten As Long, ByVal Rotate As Long, ByVal NibShape As Long, ByVal Transparency As Long, ByVal SoftEdge As Long, ByVal AntiAlias As Long)
  • Sub FadeLastCommand(ByVal Percent As Long, ByVal MergeMode As Long)
  • Sub FileClose()
  • Sub FileExit(ByVal PromptUser As Boolean)
  • Sub FileImport(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long, ByVal X As Long, ByVal Y As Long, ByVal BoxLeft As Long, ByVal BoxTop As Long, ByVal BoxRight As Long, ByVal BoxBottom As Long)
  • Sub FileNew(ByVal Width As Long, ByVal Height As Long, ByVal Type As Long, ByVal HRes As Long, ByVal VRes As Long, ByVal PartialFile As Boolean, ByVal MovieFile As Boolean, ByVal NumberFrames As Long, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal Background As Boolean)
  • Sub FileOpen(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long, ByVal StartFrame As Long, ByVal EndFrame As Long)
  • Sub FilePrint()
  • Sub FileRevert()
  • Sub FileSave(ByVal FileName As String, ByVal FilterID As Long, ByVal Compression As Long)
  • Sub FileSelectPartialArea(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long)
  • Sub Fill(ByVal Left As Long, ByVal Top As Long, ByVal AntiAlias As Boolean)
  • Sub FillBitmap(ByVal BitmapName As String, ByVal Width As Long, ByVal Height As Long, ByVal Xoffset As Long, ByVal Yoffset As Long, ByVal TileColumn As Boolean, ByVal TileOffset As Long, ByVal MaintainAspect As Boolean, ByVal Scale As Boolean, ByVal OriginalSize As Boolean, ByVal SkewAngle As Long, ByVal RotateAngle As Long)
  • Sub FillFountain()
  • Sub FillFountainApply(ByVal Type As Long, ByVal Colors As Long, ByVal Steps As Long, ByVal Angle As Long, ByVal EdgePad As Long, ByVal HorizontalOffset As Long, ByVal VerticalOffset As Long, ByVal Midpoint As Long)
  • Sub FillFountainColor(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal Position As Long, ByVal Index As Long)
  • Sub FillSolid(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub FillTexture(ByVal LibraryName As String, ByVal TextureName As String, ByVal StyleName As String)
  • Sub FillTextureSettings(ByVal Index As Long, ByVal Value1 As Long, ByVal Value2 As Long, ByVal Value3 As Long, ByVal Value4 As Long)
  • Sub FillTool(ByVal Transparency As Long, ByVal MergeMode As Long)
  • Sub FilterAVI(ByVal Handler As Long, ByVal KeyFrame As Long, ByVal Quality As Long, ByVal BPS As Long, ByVal Flags As Long, ByVal Interleave As Long)
  • Sub FilterFPX(ByVal Compression As Long, ByVal Decimation As Long, ByVal Quality As Long)
  • Sub FilterGIF(ByVal InvertMask As Long, ByVal Interlace As Long, ByVal Transparent As Long, ByVal Index As Long, ByVal Delay As Long, ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long)
  • Sub FilterICO(ByVal Transparent As Long, ByVal Inverse As Long)
  • Sub FilterJPG(ByVal Quality As Long, ByVal Progressive As Long, ByVal Smoothing As Long, ByVal SubFormat As Long, ByVal Optimized As Long)
  • Sub FilterMPG(ByVal Emphasis As Long, ByVal Quality As Long, ByVal Audio As Boolean, ByVal Video As Boolean, ByVal System As Boolean)
  • Sub FilterOS2(ByVal Format As Long)
  • Sub FilterPCD(ByVal Resolution As Long, ByVal Color As Long)
  • Sub FilterPNG(ByVal Interlace As Long)
  • Sub FilterRAW(ByVal Format As Long, ByVal Type As Long, ByVal Width As Long, ByVal Height As Long, ByVal BitCount As Long, ByVal Header As Long, ByVal Mask As Long, ByVal PaletteType As Long, ByVal Location As Long, ByVal Entries As Long)
  • Sub FilterTGA(ByVal Format As Long)
  • Sub FilterWVL(ByVal Quality As Long, ByVal Speed As Long, ByVal Path As Long, ByVal Contrast As Long, ByVal Edge As Long)
  • Function GetChannelCount() As Long
  • Function GetChannelName(ByVal ChannelID As Long) As String
  • Function GetCurrentMovieFrame() As Long
  • Function GetDocumentCount() As Long
  • Function GetDocumentHeight() As Long
  • Function GetDocumentHRes() As Long
  • Function GetDocumentIsMovie() As Boolean
  • Function GetDocumentIsPartial() As Boolean
  • Function GetDocumentModified() As Long
  • Function GetDocumentName() As String
  • Function GetDocumentType() As Long
  • Function GetDocumentVRes() As Long
  • Function GetDocumentWidth() As Long
  • Function GetDocumentXdpi() As Long
  • Function GetDocumentXGridFrequency() As Long
  • Function GetDocumentXRulerUnits() As Long
  • Function GetDocumentYdpi() As Long
  • Function GetDocumentYGridFrequency() As Long
  • Function GetDocumentYRulerUnits() As Long
  • Function GetFillColor(ByRef ColorModel As Long, ByRef Color1 As Long, ByRef Color2 As Long, ByRef Color3 As Long, ByRef Color4 As Long) As Boolean
  • Function GetFrameCount() As Long
  • Function GetGuidelineCount() As Long
  • Sub GetGuidelineProperties(ByVal Index As Long, ByRef X As Long, ByRef Y As Long, ByRef Angle As Long, ByRef Horizontal As Long)
  • Function GetMaskPresent() As Long
  • Sub GetMaskRectangle(ByRef Left As Long, ByRef Top As Long, ByRef Right As Long, ByRef Bottom As Long)
  • Function GetObjectCount() As Long
  • Function GetObjectIsEditable(ByVal ObjectID As Long) As Boolean
  • Function GetObjectIsSelected(ByVal ObjectID As Long) As Boolean
  • Function GetObjectIsVisible(ByVal ObjectID As Long) As Boolean
  • Function GetObjectMergeMode(ByVal ObjectID As Long) As Long
  • Function GetObjectName(ByVal ObjectID As Long) As String
  • Function GetObjectOpacity(ByVal ObjectID As Long) As Long
  • Sub GetObjectProperties(ByVal ObjectID As Long, ByVal Name As String, ByRef Opacity As Long, ByRef MergeMode As Long, ByRef Visible As Boolean, ByRef Clipped As Boolean, ByRef Enabled As Boolean, ByRef Linked As Boolean)
  • Sub GetObjectRectangle(ByVal ObjectID As Long, ByRef Left As Long, ByRef Top As Long, ByRef Right As Long, ByRef Bottom As Long)
  • Sub GetPaintColor(ByRef ColorModel As Long, ByRef Color1 As Long, ByRef Color2 As Long, ByRef Color3 As Long, ByRef Color4 As Long)
  • Function GetPaintVersion() As String
  • Sub GetPaperColor(ByRef ColorModel As Long, ByRef Color1 As Long, ByRef Color2 As Long, ByRef Color3 As Long, ByRef Color4 As Long)
  • Function GetPartialDocumentHeight() As Long
  • Function GetPartialDocumentWidth() As Long
  • Function GetPhotoPaintDir() As String
  • Function GetPixelColor(ByVal X As Long, ByVal Y As Long, ByRef ColorModel As Long, ByRef Color1 As Long, ByRef Color2 As Long, ByRef Color3 As Long, ByRef Color4 As Long) As Boolean
  • Sub GetSelectedObjectsRectangle(ByRef Left As Long, ByRef Top As Long, ByRef Right As Long, ByRef Bottom As Long)
  • Sub Gradient(ByVal Type As Long, ByVal MarkerPos As Long)
  • Sub GradientPoint(ByVal Index As Long, ByVal PtX As Long, ByVal PtY As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal Transparency As Long)
  • Sub GradientTool(ByVal Style As Long, ByVal MergeMode As Long, ByVal Transparency As Long, ByVal Handles As Long)
  • Sub GridSetup(ByVal GridX As Double, ByVal GridY As Double, ByVal Units As Long, ByVal GridOn As Boolean)
  • Sub GuidelineAdd(ByVal X As Long, ByVal Y As Long, ByVal Angle As Long, ByVal Horizontal As Boolean)
  • Sub GuidelineDelete()
  • Sub GuidelineMove(ByVal X As Long, ByVal Y As Long)
  • Sub GuidelineSelect(ByVal GuideID As Long, ByVal Selected As Boolean)
  • Sub ImageApplyICCProfile(ByVal FileName As String)
  • Sub ImageAutoEqualize(ByVal AutoBlack As Long, ByVal AutoWhite As Long)
  • Sub ImageBCI(ByVal Brightness As Long, ByVal Contrast As Long, ByVal Intensity As Long)
  • Sub ImageColorBalance(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long, ByVal Shadows As Boolean, ByVal Midtones As Boolean, ByVal Highlights As Boolean, ByVal Luminance As Boolean)
  • Sub ImageColorCrop(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub ImageColorHue(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long, ByVal Shadows As Boolean, ByVal Midtones As Boolean, ByVal Highlights As Boolean, ByVal Luminance As Boolean)
  • Sub ImageColorTable(ByVal Colors As Long)
  • Sub ImageColorTone(ByVal Hue As Long, ByVal Saturation As Long, ByVal Lightness As Long, ByVal Brightness As Long, ByVal Contrast As Long, ByVal Intensity As Long)
  • Sub ImageConvert(ByVal Type As Long, ByVal RenderType As Long, ByVal PaletteType As Long, ByVal Threshold As Integer, ByVal HalftoneType As Long, ByVal Angle As Long, ByVal Width As Long, ByVal Colors As Long, ByVal Intensity As Long, ByVal Flatten As Boolean)
  • Sub ImageConvertDuotone(ByVal Style As Long, ByVal UseOverprints As Boolean, ByVal Flatten As Boolean)
  • Sub ImageConvertPaletted(ByVal RenderType As Long, ByVal Colors As Long, ByVal Intensity As Long, ByVal Flatten As Boolean)
  • Sub ImageConvertVideoNTSC()
  • Sub ImageConvertVideoPAL()
  • Sub ImageCrop(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long)
  • Sub ImageCropToMask()
  • Sub ImageDeInterlace(ByVal ReplaceMode As Long)
  • Sub ImageDesaturate()
  • Sub ImageDeskew(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ImageDeskewCrop(ByVal Angle As Double, ByVal Width As Long, ByVal Height As Long, ByVal PointX As Long, ByVal PointY As Long)
  • Sub ImageDuplicate(ByVal FileName As String, ByVal MergeObjects As Boolean)
  • Sub ImageEqualize(ByVal Method As Long, ByVal AutoBlack As Long, ByVal AutoWhite As Long, ByVal AutoAdjust As Boolean)
  • Sub ImageEqualizeChannel(ByVal Index As Long, ByVal InLow As Long, ByVal InHigh As Long, ByVal OutLow As Long, ByVal OutHigh As Long, ByVal Gamma As Long)
  • Sub ImageFlipHorizontal()
  • Sub ImageFlipVertical()
  • Sub ImageGamma(ByVal Value As Long)
  • Sub ImageHSL(ByVal Hue As Long, ByVal Saturation As Long, ByVal Lightness As Long)
  • Sub ImageHSLChannel(ByVal Channel As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Lightness As Long)
  • Sub ImageInvert()
  • Sub ImageLevelThreshold(ByVal Channel As Long, ByVal Low As Long, ByVal Threshold As Long, ByVal High As Long, ByVal BiLevel As Long)
  • Sub ImagePapersize(ByVal Width As Long, ByVal Height As Long, ByVal Xoffset As Long, ByVal Yoffset As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ImagePosterize(ByVal Level As Long)
  • Sub ImageReplaceColors(ByVal TypeIn As Long, ByVal Comp1In As Long, ByVal Comp2In As Long, ByVal Comp3In As Long, ByVal Comp4In As Long, ByVal TypeOut As Long, ByVal Comp1Out As Long, ByVal Comp2Out As Long, ByVal Comp3Out As Long, ByVal Comp4Out As Long, ByVal Range As Long, ByVal IgnoreGrayscale As Boolean, ByVal SingleColor As Boolean)
  • Sub ImageResample(ByVal Width As Long, ByVal Height As Long, ByVal HRes As Long, ByVal VRes As Long, ByVal AntiAlias As Boolean)
  • Sub ImageRotate(ByVal Angle As Double, ByVal Clip As Boolean, ByVal AntiAlias As Boolean, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ImageSelectiveColor(ByVal Mode As Long)
  • Sub ImageSelectiveColorChannel(ByVal Channel As Long, ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long)
  • Sub ImageSetChannel(ByVal Channel As Long)
  • Sub ImageSplit(ByVal Type As Long)
  • Sub ImageSprayerList(ByVal List As String)
  • Sub ImageSprayerSettings(ByVal Dabs As Long, ByVal Spacing As Long, ByVal Spread As Long, ByVal FadeOut As Long, ByVal Type As Long, ByVal From As Long, ByVal To As Long, ByVal Start As Long)
  • Sub ImageSprayerTool(ByVal FileName As String, ByVal Row As Long, ByVal Column As Long, ByVal Size As Long, ByVal MergeMode As Long, ByVal Transparency As Long)
  • Sub ImageSTBalance(ByVal Channel As Long, ByVal UseLow As Boolean, ByVal UseMid As Boolean, ByVal UseHigh As Boolean, ByVal UseAll As Boolean)
  • Sub ImageSTColor(ByVal Index As Long, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ImageToneChannel(ByVal Channel As Long, ByVal Nodes As Long, ByVal Gamma As Long, ByVal Length As Long, ByVal DrawMode As Long, ByVal Orientation As Long)
  • Sub ImageToneCurve()
  • Sub ImageTonePoint(ByVal Channel As Long, ByVal Index As Long, ByVal X As Long, ByVal Y As Long)
  • Sub ImageToneTable(ByVal Number As Long, ByVal Curve1 As Long, ByVal Curve2 As Long, ByVal Curve3 As Long, ByVal Curve4 As Long)
  • Sub LensCreateFromMask(ByVal Name As String)
  • Sub LensEdit(ByVal ObjectID As Long, ByVal Name As String)
  • Sub LensNew(ByVal Name As String)
  • Sub LineTool(ByVal Width As Long, ByVal Transparency As Long, ByVal Joints As Long, ByVal MergeMode As Long, ByVal AntiAlias As Boolean, ByVal RenderObject As Boolean)
  • Sub LocalUndo(ByVal Width As Long, ByVal Flatten As Long, ByVal Rotate As Long, ByVal NibShape As Long, ByVal Transparency As Long, ByVal SoftEdge As Long, ByVal AntiAlias As Long)
  • Sub MaskAffineDistort(ByVal Xoffset As Long, ByVal Yoffset As Long, ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, ByVal AntiAlias As Boolean)
  • Sub MaskAlign(ByVal Horizontal As Long, ByVal Vertical As Long, ByVal Center As Boolean, ByVal Grid As Boolean, ByVal ActiveObject As Boolean, ByVal SelectedObject As Boolean, ByVal Background As Boolean)
  • Sub MaskAntiAlias(ByVal Tolerance As Long)
  • Sub MaskAverage(ByVal Radius As Long)
  • Sub MaskBorder(ByVal Width As Long, ByVal Edges As Long)
  • Sub MaskBrush(ByVal DrawMode As Long, ByVal Width As Long, ByVal Flatten As Long, ByVal Rotate As Long, ByVal NibShape As Long, ByVal Transparency As Long, ByVal SoftEdge As Long, ByVal AntiAlias As Long)
  • Sub MaskChannelAdd(ByVal MaskName As String)
  • Sub MaskChannelDelete(ByVal MaskID As Long)
  • Sub MaskChannelLoad(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long)
  • Sub MaskChannelName(ByVal MaskID As Long, ByVal Name As String)
  • Sub MaskChannelSave(ByVal MaskID As Long, ByVal FileName As String, ByVal FilterID As Long, ByVal Compression As Long)
  • Sub MaskChannelToMask(ByVal MaskID As Long, ByVal DrawMode As Long)
  • Sub MaskCreate(ByVal PreserveImage As Boolean, ByVal DrawMode As Long)
  • Sub MaskCreateFromPath(ByVal AntiAlias As Boolean, ByVal DrawMode As Long)
  • Sub MaskDeFloat()
  • Sub MaskDefloatIntoSelection()
  • Sub MaskDistort(ByVal Corner1X As Long, ByVal Corner1Y As Long, ByVal Corner2X As Long, ByVal Corner2Y As Long, ByVal Corner3X As Long, ByVal Corner3Y As Long, ByVal Corner4X As Long, ByVal Corner4Y As Long, ByVal AntiAlias As Boolean)
  • Sub MaskEllipse(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal DrawMode As Long, ByVal Feather As Long, ByVal AntiAlias As Boolean)
  • Sub MaskExpand(ByVal Width As Long)
  • Sub MaskFeather(ByVal Width As Long, ByVal Direction As Long, ByVal Type As Long)
  • Sub MaskFlipHorizontal()
  • Sub MaskFlipVertical()
  • Sub MaskFloaterMoveTo(ByVal Left As Long, ByVal Bottom As Long, ByVal Copy As Boolean, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub MaskFloaterTranslate(ByVal Left As Long, ByVal Bottom As Long, ByVal Copy As Boolean)
  • Sub MaskFreehand(ByVal DrawMode As Long, ByVal Feather As Long, ByVal AntiAlias As Long)
  • Sub MaskGrow(ByVal AntiAlias As Boolean, ByVal MaskVisible As Boolean, ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub MaskInvert()
  • Sub MaskLasso(ByVal DrawMode As Long, ByVal AntiAlias As Boolean, ByVal MaskVisible As Boolean)
  • Sub MaskLoad(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long)
  • Sub MaskMagicWand(ByVal X As Long, ByVal Y As Long, ByVal DrawMode As Long, ByVal AntiAlias As Boolean, ByVal MaskVisible As Boolean, ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub MaskPaint(ByVal Mask As Long)
  • Sub MaskRectangle(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal DrawMode As Long, ByVal Feather As Long)
  • Sub MaskReduce(ByVal Width As Long)
  • Sub MaskRemove()
  • Sub MaskRemoveHoles()
  • Sub MaskRotate(ByVal XCenter As Long, ByVal YCenter As Long, ByVal Angle As Double, ByVal AntiAlias As Boolean)
  • Sub MaskSave(ByVal FileName As String, ByVal FilterID As Long, ByVal Compression As Long)
  • Sub MaskScissors(ByVal DrawMode As Long, ByVal Feather As Long, ByVal AntiAlias As Boolean, ByVal MaskVisible As Boolean)
  • Sub MaskSelectAll()
  • Sub MaskSimilar(ByVal AntiAlias As Boolean, ByVal MaskVisible As Boolean, ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub MaskSkew(ByVal HorizontalAngle As Double, ByVal VerticalAngle As Double, ByVal AntiAlias As Boolean)
  • Sub MaskSmooth(ByVal Radius As Long)
  • Sub MaskStretch(ByVal Left As Long, ByVal Top As Long, ByVal XScale As Double, ByVal YScale As Double, ByVal AntiAlias As Boolean)
  • Sub MaskStroke(ByVal Mode As Long)
  • Sub MaskThreshold(ByVal Level As Long)
  • Sub MaskToMaskChannel(ByVal MaskID As Long)
  • Sub MaskTranslate(ByVal X As Long, ByVal Y As Long)
  • Sub MovieBackOne()
  • Sub MovieCreate()
  • Sub MovieDeleteFrame(ByVal FromFrame As Long, ByVal ToFrame As Long)
  • Sub MovieForward()
  • Sub MovieForwardOne()
  • Sub MovieFrameDelay(ByVal StartFrame As Long, ByVal EndFrame As Long, ByVal Delay As Long)
  • Sub MovieFrameRate(ByVal Frames As Long)
  • Sub MovieGotoFrame(ByVal Frame As Long)
  • Sub MovieInsertFile(ByVal FileName As String, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long, ByVal LoadType As Long, ByVal StartFrame As Long, ByVal Before As Boolean)
  • Sub MovieInsertFrame(ByVal StartFrame As Long, ByVal NumberOfFrames As Long, ByVal Before As Boolean, ByVal CopyCurrent As Boolean)
  • Sub MovieMoveFrame(ByVal FromFrame As Long, ByVal ToFrame As Long, ByVal MoveToFrame As Long, ByVal Before As Boolean)
  • Sub MovieRewind()
  • Sub MovieSelectPartial(ByVal StartFrame As Long, ByVal EndFrame As Long)
  • Sub NibSettings(ByVal FileName As String, ByVal NibIndex As Long)
  • Sub ObjectAddClipMask(ByVal Value As Long)
  • Sub ObjectAddClipMaskFromMask(ByVal Inverted As Boolean)
  • Sub ObjectAddClipMaskFromTransparency()
  • Sub ObjectAffineDistort(ByVal Xoffset As Long, ByVal Yoffset As Long, ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, ByVal AntiAlias As Boolean)
  • Sub ObjectAlign(ByVal Horizontal As Long, ByVal Vertical As Long, ByVal Center As Boolean, ByVal Grid As Boolean, ByVal Active As Boolean, ByVal Selected As Boolean, ByVal DistributeBounds As Boolean, ByVal HorizontalAlign As Boolean, ByVal VerticalAlign As Boolean, ByVal ObjectSpacing As Boolean, ByVal XSpacing As Long, ByVal YSpacing As Long)
  • Sub ObjectClip()
  • Sub ObjectClipToParent(ByVal ObjectID As Long, ByVal Clip As Boolean)
  • Sub ObjectColorTransparencyTool(ByVal ToleranceMode As Long, ByVal ApplyToClipMask As Boolean, ByVal Smoothing As Long)
  • Sub ObjectCombine()
  • Sub ObjectCreate(ByVal PreserveImage As Boolean)
  • Sub ObjectCreateFromBackground()
  • Sub ObjectDefringe(ByVal Amount As Long)
  • Sub ObjectDelete()
  • Sub ObjectDistort(ByVal Corner1X As Long, ByVal Corner1Y As Long, ByVal Corner2X As Long, ByVal Corner2Y As Long, ByVal Corner3X As Long, ByVal Corner3Y As Long, ByVal Corner4X As Long, ByVal Corner4Y As Long, ByVal AntiAlias As Boolean)
  • Sub ObjectDropShadow(ByVal Mode As Boolean, ByVal Direction As Long, ByVal Distance As Long, ByVal Feather As Long, ByVal Type As Long, ByVal Edges As Long, ByVal Opacity As Long, ByVal Relative As Boolean, ByVal Fade As Long, ByVal Anchor As Long, ByVal Stretch As Double, ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub ObjectDropShadowCombine()
  • Sub ObjectDropShadowDelete()
  • Sub ObjectDropShadowSplit()
  • Sub ObjectDuplicate()
  • Sub ObjectEdit(ByVal ObjectID As Long, ByVal Edit As Boolean)
  • Sub ObjectEditAll()
  • Sub ObjectEditNone()
  • Sub ObjectEditSelected()
  • Sub ObjectEditTransparency(ByVal Mode As Long)
  • Sub ObjectFeather(ByVal Width As Long, ByVal Type As Long)
  • Sub ObjectFlipHorizontal()
  • Sub ObjectFlipVertical()
  • Sub ObjectGroup()
  • Sub ObjectMerge(ByVal All As Boolean)
  • Sub ObjectMergeMode(ByVal MergeMode As Long)
  • Sub ObjectName(ByVal ObjectID As Long, ByVal Name As String)
  • Sub ObjectNew(ByVal Name As String, ByVal Opacity As Long, ByVal MergeMode As Long)
  • Sub ObjectOpacity(ByVal Amount As Long)
  • Sub ObjectOrder(ByVal Order As Long)
  • Sub ObjectOrderChange(ByVal Source As Long, ByVal Destination As Long)
  • Sub ObjectProperties(ByVal ObjectID As Long, ByVal Name As String, ByVal Opacity As Long, ByVal MergeMode As Long, ByVal Visible As Boolean, ByVal Clip As Boolean, ByVal Enable As Boolean, ByVal Link As Boolean)
  • Sub ObjectRemoveClipMask(ByVal Apply As Boolean)
  • Sub ObjectRemoveMatte(ByVal White As Boolean)
  • Sub ObjectRotate(ByVal XCenter As Long, ByVal YCenter As Long, ByVal Angle As Double, ByVal AntiAlias As Boolean, ByVal Copy As Boolean)
  • Sub ObjectSelect(ByVal ObjectID As Long, ByVal Selected As Boolean)
  • Sub ObjectSelectAll()
  • Sub ObjectSelection()
  • Sub ObjectSelectNone()
  • Sub ObjectSkew(ByVal HorizontalAngle As Double, ByVal VerticalAngle As Double, ByVal AntiAlias As Boolean, ByVal Copy As Boolean)
  • Sub ObjectStretch(ByVal Left As Long, ByVal Top As Long, ByVal XScale As Double, ByVal YScale As Double, ByVal AntiAlias As Boolean, ByVal Copy As Boolean)
  • Sub ObjectTagWWWURL()
  • Sub ObjectThreshold(ByVal Threshold As Long)
  • Sub ObjectToggleClipMask(ByVal Clip As Boolean)
  • Sub ObjectToggleLinkClipMask(ByVal ObjectID As Long, ByVal Link As Boolean)
  • Sub ObjectTranslate(ByVal X As Long, ByVal Y As Long, ByVal Copy As Boolean)
  • Sub ObjectTransparencyTool(ByVal Start As Long, ByVal End As Long, ByVal UseOriginal As Boolean, ByVal Handles As Long, ByVal ApplyToClipMask As Boolean)
  • Sub ObjectUngroup()
  • Sub ObjectURLInfo(ByVal ObjectID As Long, ByVal Region As Long, ByVal Address As String, ByVal Comments As String)
  • Sub ObjectVisible(ByVal StartIndex As Long, ByVal EndIndex As Long, ByVal Visible As Boolean)
  • Sub OverprintColor(ByVal Number As Long, ByVal Cyan As Long, ByVal Magenta As Long, ByVal Yellow As Long, ByVal Black As Long)
  • Sub PaletteColor(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long, ByVal Index As Long)
  • Sub PathCreate(ByVal Nodes As Long)
  • Sub PathCreateFromMask(ByVal Tightness As Long, ByVal Threshold As Long)
  • Sub PathDelete(ByVal FromDisk As Boolean)
  • Sub PathDuplicate()
  • Sub PathEnd()
  • Sub PathImportVector(ByVal FileName As String, ByVal ScaleX As Double, ByVal ScaleY As Double)
  • Sub PathLoad(ByVal PathName As String)
  • Sub PathNew()
  • Sub PathNode(ByVal X As Double, ByVal Y As Double, ByVal Closed As Boolean, ByVal Continuity As Long, ByVal Type As Long)
  • Sub PathSave(ByVal PathName As String)
  • Sub PathSetClippingPath(ByVal PathID As Long)
  • Sub PathStroke()
  • Sub PathVisible(ByVal Visible As Boolean)
  • Sub PolygonTool(ByVal Width As Long, ByVal Transparency As Long, ByVal Joints As Long, ByVal MergeMode As Long, ByVal AntiAlias As Boolean, ByVal RenderObject As Boolean, ByVal Fill As Boolean)
  • Sub PressureSettings(ByVal Size As Long, ByVal Transparency As Long, ByVal Softness As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long, ByVal Texture As Long, ByVal Bleed As Long, ByVal Resaturate As Long, ByVal Mask As Long, ByVal Elongation As Long)
  • Sub RandomSeed(ByVal Seed As Long)
  • Sub Rectangle(ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long)
  • Sub RectangleTool(ByVal Width As Long, ByVal Transparency As Long, ByVal Roundness As Long, ByVal MergeMode As Long, ByVal AntiAlias As Boolean, ByVal RenderObject As Boolean, ByVal Fill As Boolean)
  • Function RegisterObject(ByVal ObjectID As String) As Boolean
  • Sub RepeatSettings(ByVal Repeat As Long, ByVal Rotate As Long, ByVal RotateVar As Long, ByVal ColorFromImage As Long, ByVal Hue As Long, ByVal Lightness As Long, ByVal Saturation As Long, ByVal AccummulateAngle As Long, ByVal TangentToPath As Long, ByVal Scale As Long, ByVal ScaleVar As Long, ByVal StrokePath As Long, ByVal FromMask As Boolean, ByVal Left As Long, ByVal Top As Long, ByVal Right As Long, ByVal Bottom As Long)
  • Sub SelectionMoveTo(ByVal Left As Long, ByVal Bottom As Long)
  • Sub SelectionPlugin(ByVal GroupName As String, ByVal EffectName As String, ByVal MemoryType As Long, ByVal MemorySize As Long, ByVal Parameters As String)
  • Sub SetActiveTool(ByVal ToolID As Long)
  • Sub SetDocumentInfo(ByVal Width As Long, ByVal Height As Long)
  • Sub SetDocVisible(ByVal Show As Boolean)
  • Sub SetPaintColor(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub SetPaperColor(ByVal ColorModel As Long, ByVal Color1 As Long, ByVal Color2 As Long, ByVal Color3 As Long, ByVal Color4 As Long)
  • Sub SetVisible(ByVal Show As Boolean)
  • Sub SnapToGrid(ByVal SnapOn As Boolean)
  • Sub StartCloneDraw(ByVal SrcPtX As Long, ByVal SrcPtY As Long, ByVal DestPtX As Long, ByVal DestPtY As Long, ByVal Timer As Long, ByVal Pressure As Long, ByVal Tilt As Long, ByVal Rotate As Long)
  • Sub StartDraw(ByVal X As Long, ByVal Y As Long, ByVal Timer As Long, ByVal Pressure As Long, ByVal Tilt As Long, ByVal Rotate As Long)
  • Sub StraightenText()
  • Sub SymmetrySettings(ByVal CenterX As Long, ByVal CenterY As Long, ByVal Mode As Long, ByVal NumPoints As Long)
  • Sub TextAppend(ByVal Text As String)
  • Sub TextEdit(ByVal ObjectID As Long)
  • Sub TextFitToPath(ByVal Position As Long)
  • Sub TextRender()
  • Sub TextRenderObject()
  • Sub TextSetting(ByVal Arg As String, ByVal Value As String)
  • Sub TextTool(ByVal X As Long, ByVal Y As Long, ByVal RenderToMask As Boolean, ByVal AntiAlias As Boolean, ByVal DrawMode As Long)
  • Sub ToleranceSettings(ByVal ToleranceMode As Long, ByVal Normal As Long, ByVal Hue As Long, ByVal Saturation As Long, ByVal Brightness As Long)
  • Sub TransparencyBrushTool(ByVal Width As Long, ByVal Flatten As Long, ByVal Rotate As Long, ByVal NibShape As Long, ByVal Transparency As Long, ByVal SoftEdge As Long, ByVal Opacity As Long, ByVal UseOriginal As Boolean, ByVal AntiAlias As Boolean, ByVal ApplyToClipMask As Boolean)
  • Function UnRegisterObject(ByVal ObjectID As String) As Boolean

Class CorelScriptFile

Properties:

  • Property Application As Object [r/o]
  • Property FileName As String [r/o]
  • Property Name As String [r/w]
  • Property Parent As Object [r/o]

Methods:

  • Sub Delete()
  • Sub Play([ByVal Document As Object = Nothing])
  • Sub Translate([ByVal Document As Object = Nothing])

Class CorelScriptTools

Methods:

  • Function AngleConvert(ByVal FromUnit As Long, ByVal ToUnit As Long, ByVal Value As Double) As Double
  • Function ASin(ByVal Value As Double) As Double
  • Sub BeginWaitCursor()
  • Function BuildDate(ByVal Year As Long, ByVal Month As Long, ByVal Day As Long) As Date
  • Function BuildTime(ByVal Hour As Long, ByVal Minute As Long, ByVal Second As Long) As Date
  • Function Dec(ByVal Hex As String) As Long
  • Sub EndWaitCursor()
  • Function FileAttr(ByVal FolderFile As String) As Long
  • Function FindFirstFolder(ByVal SearchCriteria As String, ByVal Attributes As Long) As String
  • Function FindNextFolder() As String
  • Function FormatTime(ByVal Time As Date, ByVal Format As String) As String
  • Function FromCentimeters(ByVal Value As Double) As Double
  • Function FromCiceros(ByVal Value As Double) As Double
  • Function FromDidots(ByVal Value As Double) As Double
  • Function FromInches(ByVal Value As Double) As Double
  • Function FromPicas(ByVal Value As Double) As Double
  • Function FromPoints(ByVal Value As Double) As Double
  • Function GetAppHandle() As Long
  • Function GetColor(ByRef Red As Long, ByRef Green As Long, ByRef Blue As Long) As Boolean
  • Function GetCommandLine() As String
  • Function GetCurrFolder() As String
  • Sub GetDateInfo(ByVal Date As Date, ByRef Year As Long, ByRef Month As Long, ByRef Day As Long, ByRef DayOfWeek As Long)
  • Function GetFileBox([ByVal Filter As String = "All Files (*.*)|*.*"], [ByVal Title As String = ""], [ByVal Type As Long = 0], [ByVal File As String = ""], [ByVal Extension As String = ""], [ByVal Folder As String = ""], [ByVal Button As String = ""]) As String
  • Function GetFolder([ByVal InitFolder As String = ""]) As String
  • Function GetFont(ByRef FaceName As String, ByRef PointSize As Long, ByRef Weight As Long, ByRef Italic As Boolean, ByRef Underline As Boolean, ByRef StrikeOut As Boolean, ByRef Red As Long, ByRef Green As Long, ByRef Blue As Long) As Boolean
  • Function GetProcessInfo(ByVal ProcessHandle As Long) As Long
  • Function GetScriptFolder() As String
  • Function GetTempFolder() As String
  • Sub GetTimeInfo(ByVal Time As Date, ByRef Hour As Long, ByRef Minute As Long, ByRef Second As Long)
  • Function GetType(ByVal Expression As Variant) As Long
  • Function GetVersion(ByVal Option As Long) As Long
  • Function GetWinHandle() As Long
  • Function Kill(ByVal FileName As String) As Boolean
  • Function LengthConvert(ByVal FromUnit As Long, ByVal ToUnit As Long, ByVal Value As Double) As Double
  • Function Log(ByVal Value As Double) As Double
  • Function MkFolder(ByVal Folder As String) As Boolean
  • Function RegistryQuery(ByVal MainKey As Long, ByVal SubKey As String, ByVal Value As String) As Variant
  • Function Rename(ByVal Src As String, ByVal Dst As String, [ByVal Overwrite As Long = 1]) As Boolean
  • Function RmFolder(ByVal Folder As String) As Boolean
  • Function ToCentimeters(ByVal Value As Double) As Double
  • Function ToCiceros(ByVal Value As Double) As Double
  • Function ToDidots(ByVal Value As Double) As Double
  • Function ToInches(ByVal Value As Double) As Double
  • Function ToPicas(ByVal Value As Double) As Double
  • Function ToPoints(ByVal Value As Double) As Double

Class Document

Properties:

  • Property ActiveFrame As Frame [r/o]
  • Property ActiveLayer As Layer [r/o]
  • Property ActiveWindow As Window [r/o]
  • Property Application As Application [r/o]
  • Property Background As Background [r/o]
  • Property Channels As Channels [r/o]
  • Property ColorTable As ColorTable [r/o]
  • Property Dirty As Boolean [r/w]
  • Property DpiX As Long [r/w]
  • Property DpiY As Long [r/w]
  • Property FileName As String [r/o]
  • Property FilePath As String [r/o]
  • Property Frames As Frames [r/o]
  • Property FullFileName As String [r/o]
  • Property Guides As Guides [r/o]
  • Property IsMovie As Boolean [r/o]
  • Property Layers As Layers [r/o]
  • Property LockTransparency As Boolean [r/w]
  • Property Mask As Mask [r/o]
  • Property Mode As cdrImageMode [r/o]
  • Property MovieFrameCount As Long [r/o]
  • Property MovieStartFrame As Long [r/o]
  • Property Name As String [r/w]
  • Property Parent As Documents [r/o]
  • Property SizeHeight As Long [r/o]
  • Property SizeWidth As Long [r/o]
  • Property Tools As Tools [r/o]
  • Property VirtualHeight As Long [r/w]
  • Property VirtualWidth As Long [r/w]
  • Property Windows As Windows [r/o]

Methods:

  • Sub Activate()
  • Sub AddBackground([ByVal Color As Color = 0])
  • Sub ApplyICCProfile(ByVal FileName As String)
  • Sub Checkpoint()
  • Sub Close()
  • Sub ConvertTo(ByVal Mode As cdrImageMode, [ByVal Flatten As Boolean = False])
  • Sub ConvertToBW(ByVal RenderType As cdrRenderType, [ByVal Intensity As Long = 100], [ByVal Threshold As Long = 128], [ByVal Halftone As cdrHalftoneType = cdrHalftoneSquare (0)], [ByVal HalftoneAngle As Double = 45], [ByVal HalftoneSize As Long = 0])
  • Sub ConvertToDuotone([ByVal DuotoneType As cdrDuotoneType = cdrMonotone (0)], [ByVal Color1 As Color = 0], [ByVal Color2 As Color = 0], [ByVal Color3 As Color = 0], [ByVal Color4 As Color = 0])
  • Function ConvertToMovie() As Boolean
  • Sub ConvertToNTSC()
  • Sub ConvertToPAL()
  • Sub ConvertToPaletted(ByVal PaletteType As cdrImagePaletteType, [ByVal Dithering As cdrDitherType = cdrDitherNone (0)], [ByVal DitherIntensity As Long = 100], [ByVal Smoothing As Long = 0], [ByVal NumColors As Long = 256], [ByVal Flatten As Boolean = False], [ByVal KeyColor As Color = 0], [ByVal KeyColorImportance As Long = 20], [ByVal SensitivityL As Long = 500], [ByVal SensitivityA As Long = 300], [ByVal SensitivityB As Long = 300], [ByVal PaletteFileName As String])
  • Function CreateGuide(ByVal Type As pntGuideType, ByVal PositionX As Long, ByVal PositionY As Long) As Guide
  • Function CreatePalette(ByVal Name As String, [ByVal FileName As String], [ByVal Overwrite As Boolean = False]) As Palette
  • Function CreatePaletteFromVisible(ByVal Name As String, [ByVal FileName As String], [ByVal Overwrite As Boolean = False]) As Palette
  • Sub Crop(ByVal Left As Long, ByVal Top As Long, ByVal Width As Long, ByVal Height As Long)
  • Sub CropToColor(ByVal Color As Color, [ByVal Tolerance As pntToleranceMode = pntToleranceNormal (0)], [ByVal NormalLevel As Long = 0], [ByVal Hue As Long = 0], [ByVal Saturation As Long = 0], [ByVal Brightness As Long = 0])
  • Sub CropToMask()
  • Sub DeskewCrop(ByVal Angle As Double, ByVal Width As Long, ByVal Height As Long, ByVal CenterX As Long, ByVal CenterY As Long)
  • Function Duplicate([ByVal Flatten As Boolean = False], ByVal FileName As String) As Document
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub PaperSize(ByVal Width As Long, ByVal Height As Long, [ByVal OffsetX As Long = 0], [ByVal OffsetY As Long = 0], [ByVal Color As Color = 0])
  • Sub PrintOut()
  • Sub Redo()
  • Sub Repeat()
  • Sub Resample([ByVal Width As Long = 0], [ByVal Height As Long = 0], [ByVal AntiAlias As Boolean = True])
  • Sub RestoreCheckpoint()
  • Sub Revert()
  • Sub Rotate(ByVal Angle As Double, [ByVal Clip As Boolean = False], [ByVal AntiAlias As Boolean = True], [ByVal Color As Color = 0])
  • Sub Save()
  • Sub SaveAs(ByVal FileName As String, ByVal Filter As cdrFilter, [ByVal Flatten As Boolean = False])
  • Sub SelectMovieFrames(ByVal Start As Long, ByVal End As Long)
  • Sub SetResolution(ByVal NewDPI As Long)
  • Function Split(ByVal Mode As pntSplitMode) As Documents
  • Sub Undo()

Class Documents

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Document [r/o] [default]
  • Property Parent As Application [r/o]

Class DropShadow

Properties:

  • Property Angle As Double [r/o]
  • Property Application As Application [r/o]
  • Property Color As Color [r/o]
  • Property Fade As Long [r/o]
  • Property Feather As Long [r/o]
  • Property FeatherEdge As pntEdgeType [r/o]
  • Property FeatherType As pntFeatherType [r/o]
  • Property Offset As Double [r/o]
  • Property Opacity As Long [r/o]
  • Property Parent As Object [r/o]
  • Property PerspectiveStretch As Double [r/o]
  • Property Type As pntDropShadowType [r/o]

Methods:

  • Sub Combine()
  • Sub Delete()
  • Function Split() As Layer

Class Floater

Properties:

  • Property Application As Application [r/o]
  • Property Parent As Document [r/o]
  • Property PositionX As Long [r/w]
  • Property PositionY As Long [r/w]
  • Property SizeHeight As Long [r/o]
  • Property SizeWidth As Long [r/o]

Methods:

  • Sub CopyToClipboard()
  • Sub CutToClipboard()
  • Sub Defloat()
  • Sub Delete()
  • Sub GetPosition(ByRef PositionX As Long, ByRef PositionY As Long)
  • Sub Move(ByVal Dx As Long, ByVal Dy As Long)
  • Sub SetPosition(ByVal PositionX As Long, ByVal PositionY As Long)

Class Frame

Properties:

  • Property Application As Application [r/o]
  • Property Background As Background [r/o]
  • Property Delay As Long [r/w]
  • Property Index As Long [r/o]
  • Property Parent As Frames [r/o]

Methods:

  • Sub Activate()
  • Sub Delete()
  • Sub Move(ByVal Index As Long)

Class Frames

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Frame [r/o] [default]
  • Property Parent As Document [r/o]

Methods:

  • Sub Activate(ByVal FrameReference As pntFrameReference)
  • Sub Delete(ByVal StartIndex As Long, ByVal EndIndex As Long)
  • Function Insert([ByVal Index As Long = 0], [ByVal Number As Long = 1], [ByVal Background As pntFrameBackground = pntFrameFill (0)], [ByVal Color As Color = 0], [ByVal Frame As Frame = 0]) As Frame
  • Function InsertFromFile(ByVal FileName As String, [ByVal Index As Long = 0], [ByVal Filter As cdrFilter = cdrAutoSense (0)], [ByVal LoadMode As pntLoadMode = pntLoadAll (0)], [ByVal Left As Long = 0], [ByVal Top As Long = 0], [ByVal Width As Long = 0], [ByVal Height As Long = 0]) As Frame
  • Sub Move(ByVal StartIndex As Long, ByVal EndIndex As Long, ByVal ToIndex As Long)
  • Sub SetDelay(ByVal StartIndex As Long, ByVal EndIndex As Long, ByVal Delay As Long)

Class GlobalDocument

Events:

  • Event NewDocument(ByVal Document As Document)
  • Event OpenDocument(ByVal Document As Document)
  • Event Quit()
  • Event Start()

Class Guide

Properties:

  • Property Application As Application [r/o]
  • Property Index As Long [r/o]
  • Property Parent As Guides [r/o]
  • Property PositionX As Long [r/w]
  • Property PositionY As Long [r/w]
  • Property Selected As Boolean [r/w]
  • Property Type As pntGuideType [r/o]

Methods:

  • Sub Delete()

Class Guides

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Guide [r/o] [default]
  • Property Parent As Document [r/o]

Class Layer

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Application [r/o]
  • Property ClipToParent As Boolean [r/w]
  • Property Grouped As Boolean [r/o]
  • Property LayerGroup As LayerRange [r/o]
  • Property MergeMode As pntMergeMode [r/w]
  • Property Name As String [r/w]
  • Property ObjectLayer As ObjectLayer [r/o]
  • Property Opacity As Long [r/w]
  • Property Parent As Document [r/o]
  • Property PositionX As Long [r/w]
  • Property PositionY As Long [r/w]
  • Property Selected As Boolean [r/w]
  • Property SizeHeight As Long [r/w]
  • Property SizeWidth As Long [r/w]
  • Property Type As pntLayerType [r/o]
  • Property URLAddress As String [r/w]
  • Property URLComment As String [r/w]
  • Property URLRegion As pntURLRegion [r/w]
  • Property Visible As Boolean [r/w]
  • Property ZOrder As Long [r/w]

Methods:

  • Sub Activate()
  • Sub AffineDistort(ByVal OffsetX As Long, ByVal OffsetY As Long, ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, [ByVal AntiAlias As Boolean = True])
  • Sub AlignToDocument(ByVal Type As pntAlignType)
  • Sub AlignToDocumentCenter(ByVal Type As pntAlignType)
  • Sub AlignToGrid(ByVal Type As pntAlignType)
  • Sub AlignToLayer(ByVal Type As pntAlignType, ByVal Layer As Layer)
  • Sub AlignToLayerRange(ByVal Type As pntAlignType, ByVal LayerRange As LayerRange)
  • Sub AlignToPoint(ByVal Type As pntAlignType, ByVal X As Long, ByVal Y As Long)
  • Function Copy() As Boolean
  • Function CreateFloater([ByVal Preserve As Boolean = False]) As Boolean
  • Sub CreateMask([ByVal MaskMode As pntMaskMode = pntMaskNormal (0)])
  • Function CreatePalette(ByVal Name As String, [ByVal FileName As String], [ByVal Overwrite As Boolean = False]) As Palette
  • Sub CreateSelection()
  • Function CropToMask() As Boolean
  • Function Cut() As Boolean
  • Sub Delete()
  • Sub Distort(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal x3 As Long, ByVal y3 As Long, ByVal x4 As Long, ByVal y4 As Long, [ByVal AntiAlias As Boolean = True])
  • Function Duplicate([ByVal OffsetX As Long = 0], [ByVal OffsetY As Long = 0]) As Layer
  • Sub Feather(ByVal Width As Long, [ByVal Type As pntFeatherType = pntFeatherAverage (0)], [ByVal Edges As pntEdgeType = pntEdgeLinear (0)])
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub GetPosition(ByRef PositionX As Long, ByRef PositionY As Long)
  • Sub GetSize(ByRef Width As Long, ByRef Height As Long)
  • Function IsInFrontOf(ByVal Layer As Layer) As Boolean
  • Sub Merge()
  • Sub Move(ByVal Dx As Long, ByVal Dy As Long)
  • Sub OrderBackOf(ByVal Layer As Layer)
  • Sub OrderBackOne()
  • Sub OrderForwardOne()
  • Sub OrderFrontOf(ByVal Layer As Layer)
  • Sub OrderToBack()
  • Sub OrderToFront()
  • Function PasteFloater([ByVal X As Variant], [ByVal Y As Variant]) As Boolean
  • Sub Rotate(ByVal Angle As Double, ByVal CenterX As Long, ByVal CenterY As Long, [ByVal AntiAlias As Boolean = True])
  • Sub SetPosition(ByVal PositionX As Long, ByVal PositionY As Long)
  • Sub SetSize([ByVal Width As Long = 0], [ByVal Height As Long = 0])
  • Sub Skew(ByVal HAngle As Double, ByVal VAngle As Double, [ByVal AntiAlias As Boolean = True])
  • Sub Stretch(ByVal XOrigin As Long, ByVal YOrigin As Long, ByVal XScale As Double, ByVal YScale As Double, [ByVal AntiAlias As Boolean = True])
  • Sub Threshold(ByVal Threshold As Long)
  • Sub Ungroup()
  • Sub UngroupAll()

Class LayerRange

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Layer [r/o] [default]
  • Property Parent As Document [r/o]
  • Property PositionX As Long [r/w]
  • Property PositionY As Long [r/w]
  • Property SizeHeight As Long [r/o]
  • Property SizeWidth As Long [r/o]

Methods:

  • Sub Add(ByVal Layer As Layer)
  • Sub AddClipMask(ByVal CreationMode As pntClipMaskMode, [ByVal OpacityLevel As Long = 0])
  • Sub AddRange(ByVal LayerRange As LayerRange)
  • Sub AddToSelection()
  • Sub AffineDistort(ByVal OffsetX As Long, ByVal OffsetY As Long, ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, [ByVal AntiAlias As Boolean = True])
  • Sub AlignToDocument(ByVal Type As pntAlignType)
  • Sub AlignToDocumentCenter(ByVal Type As pntAlignType)
  • Sub AlignToGrid(ByVal Type As pntAlignType)
  • Sub AlignToLayer(ByVal Type As pntAlignType, ByVal Layer As Layer)
  • Sub AlignToLayerRange(ByVal Type As pntAlignType, ByVal LayerRange As LayerRange)
  • Sub AlignToPoint(ByVal Type As pntAlignType, ByVal X As Long, ByVal Y As Long)
  • Function Combine() As Layer
  • Function Copy() As Boolean
  • Sub CreateMask([ByVal MaskMode As pntMaskMode = pntMaskNormal (0)])
  • Function CreatePalette(ByVal Name As String, [ByVal FileName As String], [ByVal Overwrite As Boolean = False]) As Palette
  • Sub CreateSelection()
  • Sub CropToMask()
  • Function Cut() As Boolean
  • Sub Defringe(ByVal Amount As Long)
  • Sub Delete()
  • Sub Distort(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal x3 As Long, ByVal y3 As Long, ByVal x4 As Long, ByVal y4 As Long, [ByVal AntiAlias As Boolean = True])
  • Sub Distribute(ByVal Type As pntDistributeType, [ByVal DocumentExtent As Boolean = False])
  • Sub DistributeSpace(ByVal Type As pntDistributeType, [ByVal SpaceX As Long = 0], [ByVal SpaceY As Long = 0])
  • Function Duplicate([ByVal OffsetX As Long = 0], [ByVal OffsetY As Long = 0]) As LayerRange
  • Sub Feather(ByVal Width As Long, [ByVal Type As pntFeatherType = pntFeatherAverage (0)], [ByVal Edges As pntEdgeType = pntEdgeLinear (0)])
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub GetPosition(ByRef PositionX As Long, ByRef PositionY As Long)
  • Sub GetSize(ByRef Width As Long, ByRef Height As Long)
  • Sub Group()
  • Sub Merge()
  • Sub Move(ByVal Dx As Long, ByVal Dy As Long)
  • Sub OrderBackOf(ByVal Layer As Layer)
  • Sub OrderBackOne()
  • Sub OrderForwardOne()
  • Sub OrderFrontOf(ByVal Layer As Layer)
  • Sub OrderReverse()
  • Sub OrderToBack()
  • Sub OrderToFront()
  • Sub Remove(ByVal Index As Long)
  • Sub RemoveAll()
  • Sub RemoveFromSelection()
  • Sub RemoveMatte(ByVal Type As pntMatteType)
  • Sub Rotate(ByVal Angle As Double, ByVal CenterX As Long, ByVal CenterY As Long, [ByVal AntiAlias As Boolean = True])
  • Sub SetMergeMode(ByVal MergeMode As pntMergeMode)
  • Sub SetOpacity(ByVal Opacity As Long)
  • Sub SetOrder(ByVal Order As Long)
  • Sub SetPosition(ByVal PositionX As Long, ByVal PositionY As Long)
  • Sub SetSize([ByVal Width As Long = 0], [ByVal Height As Long = 0])
  • Sub Skew(ByVal HAngle As Double, ByVal VAngle As Double, [ByVal AntiAlias As Boolean = True])
  • Sub Stretch(ByVal XOrigin As Long, ByVal YOrigin As Long, ByVal XScale As Double, ByVal YScale As Double, [ByVal AntiAlias As Boolean = True], [ByVal Relative As Boolean = False])
  • Sub Threshold(ByVal Threshold As Long)
  • Sub UngroupAll()

Class Layers

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Layer [r/o] [default]
  • Property Parent As Document [r/o]

Methods:

  • Function Add([ByVal Name As String], [ByVal Opacity As Long = 100], [ByVal MergeMode As pntMergeMode = pntMergeNormal (0)], [ByVal CreationMode As pntCreationMode = pntEmptyLayer (0)], [ByVal Source As Object = Nothing]) As Layer
  • Function All() As LayerRange
  • Function AllExcluding(ParamArray IndexArray() As Variant) As LayerRange
  • Sub Merge()
  • Function Paste([ByVal X As Variant], [ByVal Y As Variant], [ByVal IntoMask As Boolean = False]) As LayerRange
  • Function Range(ParamArray IndexArray() As Variant) As LayerRange
  • Function Selection() As LayerRange

Class Mask

Properties:

  • Property Application As Application [r/o]
  • Property Floater As Floater [r/o]
  • Property Floating As Boolean [r/o]
  • Property IsEmpty As Boolean [r/o]
  • Property Overlay As Boolean [r/w]
  • Property PaintOnMask As Boolean [r/w]
  • Property Parent As Document [r/o]
  • Property PositionX As Long [r/w]
  • Property PositionY As Long [r/w]
  • Property SizeHeight As Long [r/w]
  • Property SizeWidth As Long [r/w]

Methods:

  • Sub AffineDistort(ByVal OffsetX As Long, ByVal OffsetY As Long, ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, [ByVal AntiAlias As Boolean = True])
  • Sub AlignToDocument(ByVal Type As pntAlignType)
  • Sub AlignToDocumentCenter(ByVal Type As pntAlignType)
  • Sub AlignToGrid(ByVal Type As pntAlignType)
  • Sub AlignToLayer(ByVal Type As pntAlignType, ByVal Layer As Layer)
  • Sub AlignToLayerRange(ByVal Type As pntAlignType, ByVal LayerRange As LayerRange)
  • Sub AlignToPoint(ByVal Type As pntAlignType, ByVal X As Long, ByVal Y As Long)
  • Sub Average(ByVal Radius As Long)
  • Sub Border(ByVal Width As Long, [ByVal Type As pntBorderType = pntBorderHard (0)])
  • Sub CreateFromColorMask(ByVal ColorMask As ColorMask, [ByVal MaskMode As pntMaskMode = pntMaskNormal (0)])
  • Sub Delete()
  • Sub Distort(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal x3 As Long, ByVal y3 As Long, ByVal x4 As Long, ByVal y4 As Long, [ByVal AntiAlias As Boolean = True])
  • Sub Expand(ByVal Width As Long)
  • Sub Feather(ByVal Width As Long, [ByVal Type As pntFeatherType = pntFeatherAverage (0)], [ByVal Edges As pntEdgeType = pntEdgeLinear (0)])
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub GetPosition(ByRef PositionX As Long, ByRef PositionY As Long)
  • Sub GetSize(ByRef Width As Long, ByRef Height As Long)
  • Sub Grow([ByVal AntiAlias As Boolean = True], [ByVal UseLayer As Boolean = False], [ByVal Layer As Layer = 0], [ByVal Tolerance As pntToleranceMode = pntToleranceNormal (0)], [ByVal Normal As Long = 0], [ByVal Hue As Long = 0], [ByVal Saturation As Long = 0], [ByVal Brightness As Long = 0])
  • Sub Invert()
  • Sub Load(ByVal FileName As String, [ByVal LoadMode As pntLoadMode = pntLoadAll (0)], [ByVal Left As Long = 0], [ByVal Top As Long = 0], [ByVal Width As Long = 0], [ByVal Height As Long = 0], [ByVal CropLeft As Long = 0], [ByVal CropTop As Long = 0], [ByVal CropWidth As Long = 0], [ByVal CropHeight As Long = 0])
  • Sub Move(ByVal Dx As Long, ByVal Dy As Long)
  • Sub Reduce(ByVal Width As Long)
  • Sub RemoveHoles()
  • Sub Rotate(ByVal Angle As Double, ByVal CenterX As Long, ByVal CenterY As Long, [ByVal AntiAlias As Boolean = True])
  • Function SaveToNewChannel([ByVal Name As String], [ByVal Opacity As Long = 50], [ByVal Color As Color = 0], [ByVal InvertOverlay As Boolean = False]) As Channel
  • Sub SelectAll()
  • Sub SetPosition(ByVal PositionX As Long, ByVal PositionY As Long)
  • Sub SetSize([ByVal Width As Long = 0], [ByVal Height As Long = 0])
  • Sub Similar([ByVal AntiAlias As Boolean = True], [ByVal UseLayer As Boolean = False], [ByVal Layer As Layer = 0], [ByVal Tolerance As pntToleranceMode = pntToleranceNormal (0)], [ByVal Normal As Long = 0], [ByVal Hue As Long = 0], [ByVal Saturation As Long = 0], [ByVal Brightness As Long = 0])
  • Sub Skew(ByVal HAngle As Double, ByVal VAngle As Double, [ByVal AntiAlias As Boolean = True])
  • Sub Smooth(ByVal Radius As Long)
  • Sub Stretch(ByVal XOrigin As Long, ByVal YOrigin As Long, ByVal XScale As Double, ByVal YScale As Double, [ByVal AntiAlias As Boolean = True])
  • Sub Threshold(ByVal Threshold As Long)

Class ObjectLayer

Properties:

  • Property Application As Application [r/o]
  • Property ClipMask As ClipMask [r/o]
  • Property DropShadow As DropShadow [r/o]
  • Property IsTextLayer As Boolean [r/o]
  • Property Parent As Layer [r/o]

Methods:

  • Sub AddClipMask(ByVal CreationMode As pntClipMaskMode, [ByVal OpacityLevel As Long = 0])
  • Sub Defringe(ByVal Amount As Long)
  • Sub RemoveMatte(ByVal Type As pntMatteType)

Class Palette

Properties:

  • Property Application As Object [r/o]
  • Property Color(ByVal Index As Long) As Color [r/w]
  • Property ColorCount As Long [r/o]
  • Property DuplicatePresent As Boolean [r/o]
  • Property Name As String [r/w]
  • Property PaletteID As cdrPaletteID [r/o]
  • Property Parent As Object [r/o]
  • Property Type As cdrPaletteType [r/o]

Methods:

  • Sub AddColor(ByVal Color As Color)
  • Sub Close()
  • Function Colors() As Colors
  • Function GetIndexOfColor(ByVal Color As Color) As Long
  • Sub InsertColor(ByVal Index As Long, ByVal Color As Color)
  • Sub RemoveColor(ByVal Index As Long)
  • Sub Save()

Class Palettes

Properties:

  • Property Application As Object [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Palette [r/o] [default]
  • Property Parent As Object [r/o]

Methods:

  • Function Create(ByVal Name As String, [ByVal FileName As String], [ByVal Overwrite As Boolean = False]) As Palette
  • Function Open(ByVal FileName As String) As Palette
  • Function OpenFixed(ByVal PaletteID As cdrPaletteID) As Palette

Class Tools

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Object [r/o] [default]
  • Property Parent As Document [r/o]

Class Window

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Application [r/o]
  • Property Caption As String [r/o]
  • Property Document As Document [r/o]
  • Property GridVisible As Boolean [r/w]
  • Property GuidesVisible As Boolean [r/w]
  • Property Height As Long [r/w]
  • Property Index As Long [r/o]
  • Property Left As Long [r/w]
  • Property Next As Window [r/o]
  • Property Parent As Windows [r/o]
  • Property Previous As Window [r/o]
  • Property RulerOriginX As Long [r/w]
  • Property RulerOriginY As Long [r/w]
  • Property RulersVisible As Boolean [r/w]
  • Property SnapToGrid As Boolean [r/w]
  • Property SnapToGuides As Boolean [r/w]
  • Property Top As Long [r/w]
  • Property ViewCenterX As Long [r/w]
  • Property ViewCenterY As Long [r/w]
  • Property Visible As Boolean [r/w]
  • Property Width As Long [r/w]
  • Property WindowState As cdrWindowState [r/w]
  • Property Zoom As Long [r/w]

Methods:

  • Sub Activate()
  • Sub Close()
  • Function NewWindow() As Window
  • Sub SetViewCenter(ByVal X As Long, ByVal Y As Long)

Class Windows

Properties:

  • Property Application As Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As Window [r/o] [default]
  • Property Parent As Application [r/o]

Methods:


Class Workspace

Properties:

  • Property Active As Boolean [r/o]
  • Property Application As Object [r/o]
  • Property Default As Boolean [r/o]
  • Property Description As String [r/o]
  • Property Name As String [r/o]
  • Property Parent As Workspaces [r/o]

Methods:

  • Sub Activate()

Class Workspaces

Properties:

  • Property Application As Object [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Workspace [r/o] [default]
  • Property Parent As Object [r/o]

Enum cdrColorType

  • cdrColorPantone As Long=1
  • cdrColorCMYK As Long=2
  • cdrColorCMY As Long=4
  • cdrColorRGB As Long=5
  • cdrColorHSB As Long=6
  • cdrColorHLS As Long=7
  • cdrColorBlackAndWhite As Long=8
  • cdrColorGray As Long=9
  • cdrColorYIQ As Long=11
  • cdrColorLab As Long=12
  • cdrColorPantoneHex As Long=14
  • cdrColorRegistration As Long=20
  • cdrColorSpot As Long=25
  • cdrColorMixed As Long=99

Enum cdrDitherType

  • cdrDitherNone As Long=0
  • cdrDitherOrdered As Long=1
  • cdrDitherJarvis As Long=2
  • cdrDitherStucki As Long=3
  • cdrDitherFloyd As Long=4

Enum cdrDuotoneType

  • cdrMonotone As Long=0
  • cdrDuotone As Long=1
  • cdrTritone As Long=2
  • cdrQuadtone As Long=3

Enum cdrFilter

  • cdrAutoSense As Long=0
  • cdrBMP As Long=769
  • cdrPCX As Long=770
  • cdrTGA As Long=771
  • cdrTIFF As Long=772
  • cdrGIF As Long=773
  • cdrJPEG As Long=774
  • cdrPCD As Long=775
  • cdrPSD As Long=788
  • cdrPP As Long=789
  • cdrPIC As Long=790
  • cdrMAC As Long=791
  • cdrOS2BMP As Long=792
  • cdrEPSPhotoPaint As Long=804
  • cdrRAWPhotoPaint As Long=805
  • cdrFPX As Long=806
  • cdrRIFF As Long=807
  • cdrPICT4 As Long=808
  • cdrWPG As Long=1287
  • cdrPSEncapsulated As Long=1289
  • cdrPSInterpreted As Long=1290
  • cdrOS2Metafile As Long=1291
  • cdrCMF As Long=1295
  • cdrDXF As Long=1296
  • cdrRND As Long=1297
  • cdrTTF As Long=1302
  • cdrAT1 As Long=1303
  • cdrWPG2 As Long=1304
  • cdrBarista As Long=1312
  • cdrPDFPlaceable As Long=1314
  • cdrVSD As Long=1315
  • cdrPICTWithEPS As Long=1316
  • cdrDWG As Long=1328
  • cdrAVI As Long=1536
  • cdrCMV As Long=1539
  • cdrSHW As Long=1540
  • cdrCCH As Long=1541
  • cdrQTM As Long=1542
  • cdrCFL As Long=1550
  • cdrMPEG As Long=1551
  • cdrQTVR As Long=1560
  • cdrCPT As Long=1792
  • cdrCMX6 As Long=1793
  • cdrCMX5 As Long=1794
  • cdrCDR As Long=1795
  • cdrCDX As Long=1796
  • cdrCPX As Long=1797
  • cdrCCD As Long=1798
  • cdrCPT7 As Long=1799
  • cdrCDT As Long=1800
  • cdrPAT As Long=1801
  • cdrCPT9 As Long=1808
  • cdrCPH As Long=1803
  • cdrSWF As Long=1343
  • cdrSVG As Long=1345
  • cdrFH As Long=1344
  • cdrSCT As Long=776
  • cdrIMG As Long=787
  • cdrPNG As Long=802
  • cdrCGM As Long=1280
  • cdrPLT As Long=1281
  • cdrDRW As Long=1282
  • cdrGEM As Long=1284
  • cdrPIF As Long=1285
  • cdrPICT As Long=1288
  • cdrWMF As Long=1294
  • cdrSCD As Long=1298
  • cdrEMF As Long=1300
  • cdrEPS As Long=1289
  • cdrWI As Long=793
  • cdrXPM As Long=809
  • cdrWVL As Long=793
  • cdrAI As Long=1305
  • cdrHPGL As Long=1281
  • cdrCPT10 As Long=1808
  • cdrCAL As Long=800
  • cdrCLK As Long=1802
  • cdr3DMF As Long=1559
  • cdrTXT As Long=2048
  • cdrRTF As Long=2053
  • cdrDOC As Long=2068
  • cdrWord2000 As Long=2068
  • cdrWord95 As Long=2049
  • cdrWord2 As Long=2050
  • cdrWord55 As Long=2051
  • cdrMacWord5 As Long=2052
  • cdrWP4 As Long=2058
  • cdrWP50 As Long=2057
  • cdrWP51 As Long=2056
  • cdrWP9 As Long=2055
  • cdrWPD As Long=2055
  • cdrWSW As Long=2059
  • cdrWSD As Long=2061
  • cdrWordStar2000 As Long=2061
  • cdrWordStar7 As Long=2060
  • cdrXY As Long=2062
  • cdrSAM As Long=2063
  • cdrXLS As Long=2065
  • cdrLotus123 As Long=2066
  • cdrWK As Long=2066
  • cdrWPM As Long=2072
  • cdrICO As Long=784
  • cdrCUR As Long=785
  • cdrEXE As Long=786
  • cdrXCF As Long=816
  • cdrPNM As Long=817
  • cdrPP4 As Long=789
  • cdrPP5 As Long=803
  • cdrFMV As Long=1329
  • cdrMET As Long=1291
  • cdrNAP As Long=1292
  • cdrGIFAnimation As Long=1558

Enum cdrFlipAxes

  • cdrFlipHorizontal As Long=1
  • cdrFlipVertical As Long=2
  • cdrFlipBoth As Long=3

Enum cdrHalftoneType

  • cdrHalftoneSquare As Long=0
  • cdrHalftoneRound As Long=1
  • cdrHalftoneLine As Long=2
  • cdrHalftoneCross As Long=3
  • cdrHalftoneFixed4x4 As Long=4
  • cdrHalftoneFixed8x8 As Long=5

Enum cdrImageMode

  • cdrImageRGB As Long=0
  • cdrImageGrayscale As Long=1
  • cdrImageBlackWhite As Long=2
  • cdrImagePaletted As Long=3
  • cdrImageCMYK As Long=4
  • cdrImageDuotone As Long=5
  • cdrImageLAB As Long=6
  • cdrImageGrayscale16 As Long=7
  • cdrImageRGB48 As Long=8
  • cdrImageMultiChannel As Long=9

Enum cdrImagePaletteType

  • cdrPaletteUniform As Long=0
  • cdrPaletteStdVGA As Long=1
  • cdrPaletteAdaptive As Long=2
  • cdrPaletteOptimized As Long=3
  • cdrPaletteBlackBody As Long=4
  • cdrPaletteGrayscale As Long=5
  • cdrPaletteSystem As Long=6
  • cdrPaletteIE As Long=7
  • cdrPaletteNetscape As Long=8
  • cdrPaletteCustom As Long=9

Enum cdrPaletteID

  • cdrTRUMATCH As Long=1
  • cdrPANTONEProcess As Long=2
  • cdrPANTONECorel8 As Long=3
  • cdrUniform As Long=7
  • cdrFOCOLTONE As Long=8
  • cdrSpectraMaster As Long=9
  • cdrTOYO As Long=10
  • cdrDIC As Long=11
  • cdrPANTONEHexCoated As Long=12
  • cdrPANTONEHexUncoated As Long=24
  • cdrLab As Long=13
  • cdrNetscapeNavigator As Long=14
  • cdrInternetExplorer As Long=15
  • cdrPANTONECoated As Long=17
  • cdrPANTONEUncoated As Long=18
  • cdrPANTONEMetallic As Long=20
  • cdrPANTONEPastelCoated As Long=21
  • cdrPANTONEPastelUncoated As Long=22
  • cdrHKS As Long=23
  • cdrCustom As Long=0

Enum cdrPaletteSortMethod

  • cdrSortReverse As Long=0
  • cdrSortHue As Long=1
  • cdrSortBrightness As Long=2
  • cdrSortSaturation As Long=3
  • cdrSortRGB As Long=4
  • cdrSortHSB As Long=5
  • cdrSortName As Long=6

Enum cdrPaletteType

  • cdrFixedPalette As Long=0
  • cdrCustomPalette As Long=1

Enum cdrRenderType

  • cdrRenderLineArt As Long=0
  • cdrRenderOrdered As Long=1
  • cdrRenderJarvis As Long=2
  • cdrRenderStucki As Long=3
  • cdrRenderFloyd As Long=4
  • cdrRenderHalftone As Long=5
  • cdrRenderCardinality As Long=6

Enum cdrWindowArrangeStyle

  • cdrTileHorizontally As Long=0
  • cdrTileVertically As Long=1
  • cdrCascade As Long=2

Enum cdrWindowState

  • cdrWindowNormal As Long=1
  • cdrWindowMaximized As Long=3
  • cdrWindowMinimized As Long=2
  • cdrWindowRestore As Long=9

Enum pntAddinFilter

  • pntAddinFilterNone As Long=0
  • pntAddinFilterWhileDrawing As Long=1
  • pntAddinFilterShapeCreated As Long=2
  • pntAddinFilterNew As Long=4
  • pntAddinFilterExecute As Long=8

Enum pntAlignType

  • pntAlignLeft As Long=1
  • pntAlignRight As Long=2
  • pntAlignHCenter As Long=3
  • pntAlignTop As Long=4
  • pntAlignBottom As Long=8
  • pntAlignVCenter As Long=12

Enum pntBorderType

  • pntBorderHard As Long=0
  • pntBorderMedium As Long=1
  • pntBorderSoft As Long=2

Enum pntClipMaskMode

  • pntFromMask As Long=0
  • pntFromInvertedMask As Long=1
  • pntFromObjectTransparency As Long=2
  • pntToShowAll As Long=3
  • pntToHideAll As Long=4
  • pntUseOpacity As Long=5

Enum pntColorMaskMode

  • pntColorMaskNormal As Long=0
  • pntColorMaskHue As Long=1
  • pntColorMaskSaturation As Long=2
  • pntColorMaskBrightness As Long=4

Enum pntColorMaskType

  • pntColorMaskSampledColors As Long=0
  • pntColorMaskReds As Long=1
  • pntColorMaskYellows As Long=2
  • pntColorMaskGreens As Long=3
  • pntColorMaskCyans As Long=4
  • pntColorMaskBlues As Long=5
  • pntColorMaskMagentas As Long=6
  • pntColorMaskHighlights As Long=7
  • pntColorMaskMidtones As Long=8
  • pntColorMaskShadows As Long=9
  • pntColorMaskOutOfGamut As Long=10

Enum pntCreationMode

  • pntEmptyLayer As Long=0
  • pntFromBackground As Long=1
  • pntCopySelection As Long=2
  • pntCutSelection As Long=3

Enum pntDistributeType

  • pntDistributeLeft As Long=1
  • pntDistributeRight As Long=2
  • pntDistributeHCenter As Long=3
  • pntDistributeHSpacing As Long=4
  • pntDistributeTop As Long=8
  • pntDistributeBottom As Long=16
  • pntDistributeVCenter As Long=24
  • pntDistributeVSpacing As Long=32

Enum pntDropShadowType

  • pntDropShadowFlat As Long=0
  • pntDropShadowBottom As Long=1
  • pntDropShadowTop As Long=2
  • pntDropShadowLeft As Long=3
  • pntDropShadowRight As Long=4

Enum pntEdgeType

  • pntEdgeLinear As Long=0
  • pntEdgeSquared As Long=1
  • pntEdgeFlat As Long=2
  • pntEdgeInverseSquared As Long=3
  • pntEdgeMesa As Long=4
  • pntEdgeGaussian As Long=5

Enum pntFeatherType

  • pntFeatherAverage As Long=0
  • pntFeatherMiddle As Long=1
  • pntFeatherOutside As Long=2
  • pntFeatherInside As Long=3

Enum pntFrameBackground

  • pntFrameFill As Long=0
  • pntFrameCopy As Long=1
  • pntFrameCopyActive As Long=2

Enum pntFrameReference

  • pntFirstFrame As Long=0
  • pntLastFrame As Long=1
  • pntNextFrame As Long=2
  • pntPreviousFrame As Long=3

Enum pntGuideType

  • pntGuideVertical As Long=0
  • pntGuideHorizontal As Long=1

Enum pntLayerType

  • pntObjectLayer As Long=0
  • pntLensLayer As Long=1

Enum pntLoadMode

  • pntLoadAll As Long=0
  • pntLoadCrop As Long=1
  • pntLoadResample As Long=2

Enum pntMaskBrightnessModel

  • pntMaskToWhite As Long=0
  • pntMaskToBlack As Long=1

Enum pntMaskMode

  • pntMaskNormal As Long=0
  • pntMaskAdd As Long=1
  • pntMaskSubtract As Long=2
  • pntMaskXOR As Long=3

Enum pntMatteType

  • pntBlackMatte As Long=0
  • pntWhiteMatte As Long=1

Enum pntMergeMode

  • pntMergeNormal As Long=0
  • pntMergeAdd As Long=1
  • pntMergeSubtract As Long=2
  • pntMergeDifference As Long=3
  • pntMergeMultiply As Long=4
  • pntMergeDivide As Long=5
  • pntMergeIfLighter As Long=6
  • pntMergeIfDarker As Long=7
  • pntMergeTexturize As Long=8
  • pntMergeInvert As Long=9
  • pntMergeAND As Long=10
  • pntMergeOR As Long=11
  • pntMergeXOR As Long=12
  • pntMergeBehind As Long=13
  • pntMergeScreen As Long=14
  • pntMergeOverlay As Long=15
  • pntMergeSoftLight As Long=16
  • pntMergeHardLight As Long=17
  • pntMergeColorDodge As Long=18
  • pntMergeColorBurn As Long=19
  • pntMergeExclusion As Long=20

Enum pntSplitMode

  • pntSplitRGB As Long=0
  • pntSplitCMYK As Long=1
  • pntSplitHSB As Long=2
  • pntSplitHLS As Long=3
  • pntSplitYIQ As Long=4
  • pntSplitLAB As Long=5

Enum pntToleranceMode

  • pntToleranceNormal As Long=0
  • pntToleranceHSB As Long=1

Enum pntURLRegion

  • pntRegionRectangle As Long=0
  • pntRegionPolygon As Long=1
  • pntRegionCircle As Long=2

[ Corel PHOTO-PAINT VBA Specifics | Using VBA with Corel Applications | Oberon Home Page ]

Copyright İ 2000 by Alex Vakulenko. All rights reserved.
This page was last revised on 10/24/00.