Differences between CorelDRAW 9 and 10 object models

This file was automatically generated by TLBCompare utility
TLBCompare utility Copyright 2000 by Alex Vakulenko

Legend:

  • Not changed
  • Added
  • Removed

Class ActiveView

Properties:

  • Property Application As Application
  • Property OriginX As Double
  • Property OriginY As Double
  • Property Parent As Window
  • Property Type As cdrViewType
  • Property Zoom As Double

Methods:

  • Sub SetActualSize()
  • Sub SetViewPoint(ByVal X As Double, ByVal Y As Double, [ByVal Zoom As Double = 0])
  • Sub ToFitAllObjects()
  • Sub ToFitArea(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double)
  • Sub ToFitPage()
  • Sub ToFitPageHeight()
  • Sub ToFitPageWidth()
  • Sub ToFitSelection()
  • Sub ToFitShape(ByVal Shape As Shape)
  • Sub ToFitShapeRange(ByVal ShapeRange As ShapeRange)

Class AddinHook

Properties:

  • Property Application As Application
  • Property Filter As cdrAddinFilter
  • Property Index As Long
  • Property Parent As Application

Events:

  • Event Execute()
  • Event New(ByVal NewDocument As Document)
  • Event ShapeCreated(ByVal NewShape As Shape)
  • Event WhileDrawing(ByVal TheShape As Shape, ByRef X As Long, ByRef Y As Long)

Class AddIns

Properties:

  • Property Application As Application
  • Property Collection As Object
  • Property Parent As Application

Methods:

  • Function Attach(ByVal Filter As cdrAddinFilter, [ByVal ExecuteCommandPrompt As String]) As AddinHook

Class Application

Properties:

  • Property ActiveLayer As Layer
  • Property ActiveSelection As Shape
  • Property ActiveSelectionRange As ShapeRange
  • Property ActiveShape As Shape
  • Property ActiveTool As cdrTools
  • Property AddIns As AddIns
  • Property AppWindow As AppWindow
  • Property ArrowHeads As ArrowHeads
  • Property Clipboard As Clipboard
  • Property CommandBars As CommandBars
  • Property ConfigPath As String
  • Property EventsEnabled As Boolean
  • Property GMSManager As GMSManager
  • Property MainMenu As CommandBar
  • Property Optimization As Boolean
  • Property OutlineStyles As OutlineStyles
  • Property PanoseMatching As cdrPanoseMatchingType
  • Property Path As String
  • Property PatternCanvases As PatternCanvases
  • Property Printers As Printers
  • Property PrintJob As PrintJob
  • Property RecentFiles As RecentFiles
  • Property SetupPath As String
  • Property StatusBar As CommandBar
  • Property VBE As Object
  • Property Version As String
  • Property VersionBuild As Long
  • Property VersionMajor As Long
  • Property VersionMinor As Long

Methods:

  • Function cdrMixedDouble() As Double
  • Function cdrMixedLong() As Long
  • Function cdrMixedSingle() As Single
  • Function Create() As Document
  • 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 CreateColorEx([ByVal ColorModel As Long = 0], [ByVal V1 As Long = 0], [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]) As Color
  • Function CreateDocument() As Document
  • Function CreateDocumentFromTemplate(ByVal Template As String, [ByVal IncludeGraphics As Boolean = True]) 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 CreateShapePoint(ByVal PositionX As Double, ByVal PositionY As Double) As ShapePoint
  • Sub CreateStructAlignProperties(ByRef VariableStructAlignProperties As StructAlignProperties)
  • Sub CreateStructExportOptions(ByRef VariableStructExportOptions As StructExportOptions)
  • Sub CreateStructFontProperties(ByRef VariableStructFontProperties As StructFontProperties)
  • Sub CreateStructFountainFillProperties(ByRef VariableStructFountainFillProperties As StructFountainFillProperties)
  • Sub CreateStructHyphenationSettings(ByRef VariableStructHyphenationSettings As StructHyphenationSettings)
  • Sub CreateStructSaveAsOptions(ByRef VariableStructSaveAsOptions As StructSaveAsOptions)
  • Sub CreateStructSpaceProperties(ByRef VariableStructSpaceProperties As StructSpaceProperties)
  • Function CreateYIQColor(ByVal Y As Long, ByVal I As Long, ByVal Q As Long) As Color
  • Sub ImportWorkspace(ByVal FileName As String)
  • Function Open(ByVal FileName As String) As Document
  • Function OpenCorelScriptFile(ByVal FileNamebstrName As String) As CorelScriptFile
  • Function OpenDocument(ByVal FileName As String) As Document
  • Sub TurnOptimizations(ByVal Optimization As cdrOptimization)

Class AppWindow

Properties:

  • Property Active As Boolean
  • Property Application As Object
  • Property Caption As String
  • Property ClientHeight As Long
  • Property ClientWidth As Long
  • Property Handle As Long
  • Property Height As Long
  • Property Left As Long
  • Property Parent As Object
  • Property Top As Long
  • Property Width As Long
  • Property WindowState As cdrWindowState

Methods:

  • Sub Activate()

Class ArrowHead

Properties:

  • Property Index As Long

Class ArrowHeads

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As ArrowHead
  • Property Parent As Application

Methods:

  • Sub Remove(ByVal Index As Long)

Class CDrawDocCMX


Class Clipboard

Properties:

  • Property Application As Object
  • Property Empty As Boolean
  • Property Parent As Object
  • Property Valid As Boolean

Methods:

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

Class CloneLink

Properties:

  • Property Application As Application
  • Property BitmapColorMaskLinked As Boolean
  • Property CloneParent As Shape
  • Property FillLinked As Boolean
  • Property OutlineLinked As Boolean
  • Property Parent As Shape
  • Property ShapeLinked As Boolean
  • Property TransformLinked As Boolean

Class Color

Properties:

  • Property Application As ObjectApplication
  • Property LabComponentA As Long
  • Property LabComponentB As Long
  • Property LabLuminance As Long
  • Property PaletteID As cdrPaletteID
  • Property PaletteIndex As Long
  • Property PantoneDensity As Long
  • Property PantoneID As Long
  • Property Tint As Long
  • Property YIQChromaI As Long
  • Property YIQChromaQ As Long
  • Property YIQLuminanceY As Long

Methods:

  • Sub ConvertToFixed(ByVal PaletteID As cdrPaletteID)
  • Sub ConvertToLab()
  • Sub ConvertToPantone()
  • Sub ConvertToYIQ()
  • Sub FixedAssign(ByVal PaletteID As cdrPaletteID, ByVal PaletteIndex As Long, [ByVal Tint As Long = 100])
  • Sub LabAssign(ByVal L As Long, ByVal A As Long, ByVal B As Long)
  • Sub PantoneAssign(ByVal PantoneID As Long, ByVal Density As Long)
  • Sub RegistrationAssign()
  • Function UserAssignEx() As Boolean
  • Sub YIQAssign(ByVal Y As Long, ByVal I As Long, ByVal Q As Long)

Class Colors

Properties:

  • Property Application As ObjectApplication

Class CommandBar

Properties:

  • Property BuiltIn As Boolean
  • Property Controls As CommandBarControls
  • Property Enabled As Boolean
  • Property Height As Long
  • Property Index As Long
  • Property Left As Long
  • Property Modes As CommandBarModes
  • Property Name As String
  • Property NameLocal As String
  • Property Position As cuiBarPosition
  • Property Protection As cuiBarProtection
  • Property Top As Long
  • Property Type As cuiBarType
  • Property Visible As Boolean
  • Property Width As Long

Methods:

  • Sub Delete()
  • Sub Reset()
  • Sub SetWidth(ByVal Width As Long)
  • Sub ShowPopup(ByVal X As Variant, ByVal Y As Variant)

Class CommandBarControl

Properties:

  • Property Caption As String
  • Property DescriptionText As String
  • Property Height As Long
  • Property ID As Long
  • Property Parameter As Variant
  • Property Tag As String
  • Property ToolTipText As String
  • Property Visible As Boolean
  • Property Width As Long

Class CommandBarControls

Properties:

  • Property Count As Long
  • Property Item(ByVal Index As Long) As CommandBarControl

Class CommandBarMode

Properties:

  • Property Controls As CommandBarControls
  • Property Name As String
  • Property NameLocal As String

Class CommandBarModes

Properties:

  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As CommandBarMode

Class CommandBars

Properties:

  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As CommandBar

Methods:

  • Function Add([ByVal Name As String = ""], [ByVal Position As cuiBarPosition = cuiBarFloating (4)], [ByVal Temporary As Boolean = False]) As CommandBar

Class Connector

Properties:

  • Property EndPoint As ShapePoint
  • Property StartPoint As ShapePoint

Class CorelScript

Methods:

  • Function AppendCurveLine(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long) As Long
  • Function ApplyBlend(ByVal Steps As Boolean, ByVal NoOfStepsSpaces As Long, ByVal AngleOfRotation As Long, ByVal Loop As Boolean, ByVal PathObjectID As Long, ByVal FullPath As Boolean, ByVal RotateAll As Boolean, ByVal ColorWheelMode As Long, ByVal MapNodeStartObject As Long, ByVal MapNodeEndObject As Long, ByVal LinearBlend As Boolean, ByVal LinearSpacing As Boolean, ByVal LinkAccelerations As Boolean, ByVal AccelShapes As Boolean, ByVal BlendLogBase As Long, ByVal SpacingLogBase As Long, ByVal BlendID As Long, ByVal BlendType As Long, ByVal MapNodes As Boolean) As Long
  • Function CreateAngleDimension(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long, ByVal X4 As Long, ByVal Y4 As Long, ByVal LargeAngle As Boolean, ByVal WitnessExtension As Long, ByVal WitnessGap As Long, ByVal LabelGap As Long) As Long
  • Function CreateCallout(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long, ByVal Text As String) As Long
  • Function CreateConnector(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long, ByVal Placement As Boolean) As Long
  • Function CreateDimension(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long, ByVal Style As Long, ByVal WitnessExtension As Long, ByVal WitnessGap As Long, ByVal LabelGap As Long) As Long
  • Function DrawCurveCurveTo(ByVal x1X1 As Long, ByVal y1Y1 As Long, ByVal x2X2 As Long, ByVal y2Y2 As Long, ByVal XEnd As Long, ByVal YEnd As Long) As Long
  • Function EditObjectCommand(ByVal Cmd As Long, ByVal X As Long, ByVal Y As Long, ByVal keyKey As Long, ByVal AddToSelection As Boolean) As Long
  • Function OverprintFill() As Long
  • Function OverPrintFill() As Long
  • Function OverprintOutline() As Long
  • Function OverPrintOutline() As Long

Class CorelScriptFile

Properties:

  • Property Application As ObjectApplication
  • Property Parent As ObjectApplication

Methods:

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

Class CrossPoint

Properties:

  • Property Offset As Double
  • Property PositionX As Double
  • Property PositionY As Double

Class CrossPoints

Properties:

  • Property Count As Long
  • Property Item(ByVal Index As Long) As CrossPoint

Class Curve

Properties:

  • Property Close As Boolean
  • Property Closed As Boolean
  • Property NodeCount As Long
  • Property Nodes As Nodes
  • Property Segments As Segments
  • Property SubPathCount As Long
  • Property Subpaths As Subpaths

Methods:

  • Function CreateSubPath(ByVal X As Double, ByVal Y As Double) As SubPath
  • Function IsOnCurve(ByVal X As Double, ByVal Y As Double, [ByVal HotArea As Double = -1]) As cdrPositionOfPointOverShape
  • Sub ReverseDirection()
  • Function Selection() As NodeRange

Class DataField

Properties:

  • Property Application As Application
  • Property DocDefault As Boolean
  • Property DrawDefault As Boolean
  • Property FieldWidth As Long
  • Property Format As String
  • Property FormatType As cdrDataFormatType
  • Property Index As Long
  • Property Name As String
  • Property Parent As DataFields
  • Property SummarizeGroup As Boolean

Methods:

  • Sub Delete()
  • Sub Reorder(ByVal NewIndex As Long)

Class DataFields

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As DataField
  • Property Parent As Document

Methods:

  • Function Add(ByVal Name As String, [ByVal Format As String], [ByVal DrawDefault As Boolean = False], [ByVal DocDefault As Boolean = False], [ByVal SummarizeGroup As Boolean = False]) As DataField

Class DataItem

Properties:

  • Property Application As Application
  • Property DataField As DataField
  • Property FormattedValue As String
  • Property Parent As DataItems
  • Property Value As Variant

Methods:

  • Sub Clear()

Class DataItems

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As DataItem
  • Property Parent As Shape

Methods:

  • Function Add(ByVal DataField As DataField, [ByVal Value As Variant]) As DataItem
  • Sub Clear()
  • Sub CopyFrom(ByVal Shape As Shape)

Class Document

Properties:

  • Property Active As Boolean
  • Property ActivePowerClip As PowerClip
  • Property ActiveShape As Shape
  • Property CurvePrecision As Long
  • Property DataFields As DataFields
  • Property EditAcrossLayers As Boolean
  • Property FileName As String
  • Property FilePath As String
  • Property FullFileName As String
  • Property Grid As Grid
  • Property Index As Long
  • Property Keywords As String
  • Property Notes As String
  • Property PDFSettings As PDFVBASettings
  • Property PreserveSelection As Boolean
  • Property PrintSettings As PrintSettings
  • Property Properties As Properties
  • Property Resolution As Long
  • Property Rulers As Rulers
  • Property SelectionRange As ShapeRange
  • Property ShapeEnumDirection As cdrShapeEnumDirection
  • Property Title As String
  • Property Views As Views
  • Property WorldScale As Double

Methods:

  • Function AddPagesEx(ByVal NumberOfPages As Long, ByVal Width As Double, ByVal Height As Double) As Page
  • Sub BeginCommandGroup([ByVal CommandName As String])
  • Function CreateView(ByVal Name As String, ByVal OriginX As Double, ByVal OriginY As Double, [ByVal Zoom As Long = 0], [ByVal Page As Page = Nothing]) As View
  • Sub EndCommandGroup()
  • Function ExportBitmap(ByVal FileName As String, ByVal Filter As cdrFilter, [ByVal Range As cdrExportRange = cdrCurrentPage (1)], [ByVal ImageType As cdrImageType = cdrRGBColorImage (4)], [ByVal Width As Long = 0], [ByVal Height As Long = 0], [ByVal ResolutionX As Long = 72], [ByVal ResolutionY As Long = 72], [ByVal AntiAliasingType As cdrAntiAliasingType = cdrNormalAntiAliasing (1)], [ByVal Dithered As Boolean = False], [ByVal Transparent As Boolean = False], [ByVal UseColorProfile As Boolean = True], [ByVal Compression As cdrCompressionType = cdrCompressionNone (0)], [ByVal PaletteOptions As StructPaletteOptions]) As Object
  • Function ExportEx(ByVal FileName As String, ByVal Filter As cdrFilter, [ByVal Range As cdrExportRange = cdrCurrentPage (1)], [ByVal Options As StructExportOptions = Nothing], [ByVal PaletteOptions As StructPaletteOptions]) As Object
  • Function GetUserArea(ByRef x1 As Double, ByRef y1 As Double, ByRef x2 As Double, ByRef y2 As Double, ByRef ShiftState As Long, ByVal TimeOut As Long, ByVal Snap As Boolean, ByVal CursorShape As cdrCursorShape) As Long
  • Function GetUserClick(ByRef X As Double, ByRef Y As Double, ByRef ShiftState As Long, ByVal TimeOut As Long, ByVal Snap As Boolean, ByVal CursorShape As cdrCursorShape) As Long
  • Function InsertPagesEx(ByVal NumberOfPages As Long, ByVal BeforePage As Boolean, ByVal Page As Long, ByVal Width As Double, ByVal Height As Double) As Page
  • Sub Print()
  • Sub PrintOut()
  • Sub PublishToPDF(ByVal FileName As String)
  • Sub ResetSettings()
  • Sub RestoreSettings([ByVal Tag As String])
  • Sub SaveSettings([ByVal Tag As String])

Events:

  • Event LayerDeleted(ByRef Layer As Layer)
  • Event PageDeleted(ByRef Page As Page)
  • Event SelectionChanged(ByRef Shape As Shape)
  • Event ShapeDeleted(ByRef Shape As Shape)

Class Effect

Properties:

  • Property Application As Application
  • Property Blend As EffectBlend
  • Property CloneParent As Effect
  • Property Clones As Effects
  • Property Contour As EffectContour
  • Property ControlPath As EffectControlPath
  • Property Distortion As EffectDistortion
  • Property DropShadow As EffectDropShadow
  • Property Envelope As EffectEnvelope
  • Property Extrude As EffectExtrude
  • Property Lens As EffectLens
  • Property Parent As Effects
  • Property Perspective As EffectPerspective
  • Property TextOnPath As EffectTextOnPath
  • Property Type As cdrEffectType

Methods:

  • Sub Clear()
  • Function Separate() As ShapeRange

Class EffectArtistic

Properties:

  • Property Application As Application
  • Property Parent As Pages

Class EffectBlend

Properties:

  • Property AccelerateSize As Boolean
  • Property Angle As Double
  • Property Application As Application
  • Property BlendGroup As Shape
  • Property ColorAcceleration As Long
  • Property ColorBlendType As cdrFountainFillBlendType
  • Property EndShape As Shape
  • Property EndShapeOffset As Double
  • Property EndShapePoint As ShapePoint
  • Property FullPath As Boolean
  • Property LinkAcceleration As Boolean
  • Property Loop As Boolean
  • Property MapNodes As Boolean
  • Property Mode As cdrBlendMode
  • Property Parent As Effect
  • Property Path As Shape
  • Property RotateShapes As Boolean
  • Property Spacing As Double
  • Property SpacingAcceleration As Long
  • Property StartShape As Shape
  • Property StartShapeOffset As Double
  • Property StartShapePoint As ShapePoint
  • Property Steps As Long

Methods:

  • Function CopyFrom(ByVal Source As EffectBlend) As Boolean
  • Function FuseEnd() As Boolean
  • Function FuseStart() As Boolean
  • Function Split(ByVal StepNo As Long) As Shape

Class EffectContour

Properties:

  • Property Application As Application
  • Property ColorAcceleration As Long
  • Property ColorBlendType As cdrFountainFillBlendType
  • Property Direction As cdrContourDirection
  • Property FillColor As Color
  • Property FillColorTo As Color
  • Property LinkAcceleration As Boolean
  • Property Offset As Double
  • Property OutlineColor As Color
  • Property Parent As Effect
  • Property SpacingAcceleration As Long
  • Property Steps As Long

Class EffectControlPath

Properties:

  • Property Application As Application
  • Property Effects As Effects
  • Property Parent As Effect

Class EffectDistortion

Properties:

  • Property Application As Application
  • Property OriginX As Double
  • Property OriginY As Double
  • Property Parent As Effect
  • Property PushPull As EffectPushPullDistortion
  • Property Twister As EffectTwisterDistortion
  • Property Type As cdrDistortionType
  • Property Zipper As EffectZipperDistortion

Methods:

  • Sub CenterDistortion()

Class EffectDropShadow

Properties:

  • Property Application As Application
  • Property Color As Color
  • Property Fade As Long
  • Property Feather As Long
  • Property FeatherEdge As cdrEdgeType
  • Property FeatherType As cdrFeatherType
  • Property OffsetX As Double
  • Property OffsetY As Double
  • Property Opacity As Long
  • Property Parent As Effect
  • Property PerspectiveAngle As Double
  • Property PerspectiveStretch As Double
  • Property Type As cdrDropShadowType

Methods:

  • Sub SetOffset(ByVal OffsetX As Double, ByVal OffsetY As Double)

Class EffectEnvelope

Properties:

  • Property Application As Application
  • Property Container As Curve
  • Property KeepLines As Boolean
  • Property Mode As cdrEnvelopeMode
  • Property Parent As Effect

Methods:

  • Sub CopyFrom(ByVal Source As EffectEnvelope)
  • Function CreateFrom(ByVal Shape As Shape) As Boolean
  • Sub Select(ByVal PresetIndex As Long)

Class EffectExtrude

Properties:

  • Property AngleX As Double
  • Property AngleY As Double
  • Property AngleZ As Double
  • Property Application As Application
  • Property BaseColor As Color
  • Property BevelAngle As Double
  • Property BevelColor As Color
  • Property BevelDepth As Double
  • Property BevelGroup As Shape
  • Property Depth As Long
  • Property ExtrudeGroup As Shape
  • Property FaceShape As Shape
  • Property FaceVisible As Boolean
  • Property LightIntensity(ByVal Index As Long) As Long
  • Property LightPosition(ByVal Index As Long) As cdrExtrudeLightPosition
  • Property LightPresent(ByVal Index As Long) As Boolean
  • Property Parent As Effect
  • Property Shading As cdrExtrudeShading
  • Property ShadingColor As Color
  • Property ShowBevelOnly As Boolean
  • Property Type As cdrExtrudeType
  • Property UseBevel As Boolean
  • Property UseExtrudeColorForBevel As Boolean
  • Property UseFullColorRange As Boolean
  • Property VanishingPoint As ExtrudeVanishingPoint

Methods:

  • Sub CopyFrom(ByVal Source As EffectExtrude)
  • Sub Rotate(ByVal AngleX As Double, ByVal AngleY As Double, ByVal AngleZ As Double)
  • Sub SetBevel(ByVal Depth As Double, ByVal Angle As Double, ByVal ShowBevelOnly As Boolean)
  • Sub SetLight(ByVal Index As Long, ByVal Position As cdrExtrudeLightPosition, ByVal LightIntensity As Long)

Class EffectLens

Properties:

  • Property Application As Application
  • Property Color As Color
  • Property ColorMapPalette As cdrFountainFillBlendType
  • Property FillColor As Color
  • Property FromColor As Color
  • Property Frozen As Boolean
  • Property Magnification As Double
  • Property OutlineColor As Color
  • Property PaletteRotation As Long
  • Property Parent As Effect
  • Property Rate As Long
  • Property RemoveFace As Boolean
  • Property Shapes As Shapes
  • Property ToColor As Color
  • Property Type As cdrLensType
  • Property UseFillColor As Boolean
  • Property UseOutlineColor As Boolean
  • Property UseViewPoint As Boolean
  • Property ViewPointX As Double
  • Property ViewPointY As Double

Methods:

  • Sub Freeze()
  • Sub Unfreeze()
  • Function Ungroup() As ShapeRange

Class EffectPerspective

Properties:

  • Property Application As Application
  • Property HorizVanishingPointX As Double
  • Property HorizVanishingPointY As Double
  • Property Parent As Effect
  • Property UseHorizVanishingPoint As Boolean
  • Property UseVertVanishingPoint As Boolean
  • Property VertVanishingPointX As Double
  • Property VertVanishingPointY As Double

Class EffectPushPullDistortion

Properties:

  • Property Amplitude As Long
  • Property Application As Application
  • Property Parent As EffectDistortion

Class Effects

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As Effect
  • Property Parent As Shape

Class EffectTextOnPath

Properties:

  • Property Application As Application
  • Property DistanceFromPath As Double
  • Property Offset As Double
  • Property Orientation As cdrFittedOrientation
  • Property Parent As Effect
  • Property Path As Shape
  • Property Placement As cdrFittedPlacement
  • Property PlaceOnOtherSide As Boolean
  • Property Quadrant As cdrFittedQuadrant
  • Property Text As Shape
  • Property VertPlacement As cdrFittedVertPlacement

Class EffectTwisterDistortion

Properties:

  • Property Angle As Double
  • Property Application As Application
  • Property Parent As EffectDistortion

Class EffectZipperDistortion

Properties:

  • Property Amplitude As Long
  • Property Application As Application
  • Property Frequency As Long
  • Property Local As Boolean
  • Property Parent As EffectDistortion
  • Property Random As Boolean
  • Property Smooth As Boolean

Class Ellipse

Properties:

  • Property CenterX As Double
  • Property CenterY As Double
  • Property HRadius As Double
  • Property VRadius As Double

Methods:

  • Sub GetCenterPosition(ByRef PositionX As Double, ByRef PositionY As Double)
  • Sub GetRadius(ByRef HRadius As Double, ByRef VRadius As Double)
  • Sub SetCenterPosition(ByVal PositionX As Double, ByVal PositionY As Double)
  • Sub SetRadius(ByVal HRadius As Double, [ByVal VRadius As Double = 0])

Class ExtrudeVanishingPoint

Properties:

  • Property Application As Application
  • Property Effects As Effects
  • Property Parent As EffectExtrude
  • Property PositionX As Double
  • Property PositionY As Double
  • Property Type As cdrExtrudeVPType

Methods:

  • Function Share(ByVal Source As EffectExtrude) As Boolean

Class Fill

Properties:

  • Property Fountain As FountainFill
  • Property FountainAngle As Double
  • Property FountainBlendType As cdrFountainFillBlendType
  • Property FountainCenterX As Long
  • Property FountainCenterY As Long
  • Property FountainColorsCount As Long
  • Property FountainEdgePad As Long
  • Property FountainMidPointPosition As Long
  • Property FountainProperties As StructFountainFillProperties
  • Property FountainSteps As Long
  • Property FountainType As cdrFountainFillType
  • Property Pattern As PatternFill
  • Property PostScript As PostScriptFill
  • Property Texture As TextureFill

Methods:

  • Function ApplyFountainFill([ByVal StartColor As Color = Nothing], [ByVal EndColor As Color = Nothing], [ByVal Type As cdrFountainFillType = cdrLinearFountainFill (1)], [ByVal Angle As Double = 0], [ByVal Steps As Long = 0], [ByVal EdgePad As Long = 0], [ByVal MidPoint As Long = 50], [ByVal BlendType As cdrFountainFillBlendType = cdrDirectFountainFillBlend (0)]) As FountainFill
  • Sub ApplyNoFill()
  • Function ApplyPatternFill(ByVal Type As cdrPatternFillType, [ByVal FileName As String = ""], [ByVal PatternCanvasIndex As Long = 1], [ByVal FrontColor As Color = Nothing], [ByVal EndColor As Color = Nothing], [ByVal TransformWithShape As Boolean = False]) As PatternFill
  • Function ApplyPostscriptFill(ByVal IndexOrName As Variant) As PostScriptFill
  • Function ApplyTextureFill(ByVal TextureName As String, [ByVal LibraryName As String = ""]) As TextureFill
  • Sub ApplyUniformFill(ByVal Color As Color)
  • Sub CreateFountainFill(ByVal FountainFillProperties As StructFountainFillProperties)
  • Sub FountainAddColor(ByVal Position As Long, ByVal Color As Color)
  • Function FountainGetColor(ByVal Position As Long) As Color
  • Function FountainGetIndex(ByVal Position As Long) As Long
  • Function FountainGetPosition(ByVal Index As Long) As Long
  • Sub FountainRemoveColor(ByVal Position As Long)
  • Sub FountainSetColor(ByVal Position As Long, ByVal Color As Color)

Class FontList

Properties:

  • Property Application As ObjectApplication
  • Property Parent As ObjectApplication

Class FountainColor

Properties:

  • Property Color As Color
  • Property Position As Long

Methods:

  • Sub Delete()
  • Sub Move(ByVal NewPosition As Long)

Class FountainColors

Properties:

  • Property Count As Long
  • Property GrayLevel(ByVal Index As Long) As Long
  • Property Item(ByVal Index As Long) As FountainColor

Methods:

  • Sub Add(ByVal Color As Color, ByVal Position As Long)
  • Sub AddGrayLevel(ByVal GrayLevel As Long, ByVal Position As Long)

Class FountainFill

Properties:

  • Property Angle As Double
  • Property BlendType As cdrFountainFillBlendType
  • Property Colors As FountainColors
  • Property EdgePad As Long
  • Property EndColor As Color
  • Property EndX As Double
  • Property EndY As Double
  • Property MidPoint As Long
  • Property StartColor As Color
  • Property StartX As Double
  • Property StartY As Double
  • Property Steps As Long
  • Property Type As cdrFountainFillType

Methods:

  • Sub SetAngle(ByVal Angle As Double)
  • Sub SetEdgePad(ByVal EdgePad As Long)
  • Sub Translate(ByVal X As Double, ByVal Y As Double)

Class FrameWork

Properties:

  • Property CommandBars As CommandBars
  • Property MainMenu As CommandBar
  • Property Name As String
  • Property StatusBar As CommandBar

Methods:

  • Sub ImportWorkspace(ByVal FileName As String)

Class GlobalDocument

Events:

  • Event LayerDeleted(ByRef Layer As Layer)
  • Event PageDeleted(ByRef Page As Page)
  • Event SelectionChanged(ByRef Shape As Shape)
  • Event ShapeDeleted(ByRef Shape As Shape)

Class GMSManager

Properties:

  • Property GMSPath As String

Methods:

  • Function RunMacro(ByVal ModuleName As String, ByVal MacroName As String, ByRef Parameters() As Variant) As Variant

Class Grid

Properties:

  • Property Application As Application
  • Property Parent As Document
  • Property Snap As Boolean
  • Property SpacingX As Double
  • Property SpacingY As Double
  • Property Type As cdrGridType
  • Property Visible As Boolean

Methods:

  • Sub SetFrequency(ByVal GridX As Double, ByVal GridY As Double)

Class Guide

Properties:

  • Property Preset As Boolean
  • Property Type As cdrGuideType

Methods:

  • Sub MakeEditable()

Class Layer

Properties:

  • Property MasterProperties As Properties
  • Property Properties As Properties

Methods:

  • Function CreateConnector(ByVal Start As ShapePoint, ByVal End As ShapePoint) As Shape
  • Function CreateCurve() As Shape
  • Function CreateCurveSegment(ByVal StartX As Double, ByVal StartY As Double, ByVal EndX As Double, ByVal EndY As Double, [ByVal StartingControlPointLength As Double = -1], [ByVal StartingControlPointAngle As Double = 0], [ByVal EndingControlPointLength As Double = -1], [ByVal EndingControlPointAngle As Double = 0]) As Shape
  • Function CreateEllipse2(ByVal CenterX As Double, ByVal CenterY As Double, ByVal Radius1 As Double, [ByVal Radius2 As Double = 0], [ByVal StartAngle As Double = 90], [ByVal EndAngle As Double = 90], [ByVal Arc As Boolean = False]) As Shape
  • Function CreateFreeConnector(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double) As Shape
  • Function CreateGuide(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double) As Shape
  • Function CreateGuideAngle(ByVal X As Double, ByVal Y As Double, ByVal Angle As Double) As Shape
  • Function CreateLineSegment(ByVal StartX As Double, ByVal StartY As Double, ByVal EndX As Double, ByVal EndY As Double) As Shape
  • Function CreateParagraphText(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, [ByVal Text As String = "0"]) As Shape
  • Function CreateRectangle2(ByVal X As Double, ByVal Y As Double, ByVal Width As Double, ByVal Height As Double, [ByVal RadiusUL As Double = 0], [ByVal RadiusUR As Double = 0], [ByVal RadiusLR As Double = 0], [ByVal RadiusLL As Double = 0]) As Shape
  • Function FindShape([ByVal Name As String], [ByVal Type As cdrShapeType = cdrNoShape (0)], [ByVal StaticID As Long = 0], [ByVal Recursive As Boolean = True]) As Shape
  • Function FindShapes([ByVal Name As String], [ByVal Type As cdrShapeType = cdrNoShape (0)], [ByVal Recursive As Boolean = True]) As ShapeRange
  • Function Paste() As Shape

Class Node

Properties:

  • Property AbsoluteIndex As Long
  • Property Application As Application
  • Property Index As Long
  • Property IsEnding As Boolean
  • Property Parent As Shape
  • Property PositionX As Double
  • Property PositionY As Double
  • Property Segment As Segment
  • Property SubPath As SubPath
  • Property SubPathIndex As Long
  • Property Type As cdrNodeType

Methods:

  • Sub BreakApart()
  • Sub ConnectWith(ByVal Target As Node)
  • Sub Delete()
  • Function GetDistanceFrom(ByVal Node As Node) As Double
  • Sub GetPosition(ByRef PositionX As Double, ByRef PositionY As Double)
  • Sub JoinWith(ByVal Target As Node)
  • Sub Move([ByVal DeltaX As Double = 0], [ByVal DeltaY As Double = 0])
  • Function Next() As Node
  • Function Previous() As Node
  • Sub SetPosition(ByVal PositionX As Double, ByVal PositionY As Double)

Class NodeRange

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As Node
  • Property Parent As Shape
  • Property PositionX As Double
  • Property PositionY As Double
  • Property SegmentRange As SegmentRange
  • Property SizeHeight As Double
  • Property SizeWidth As Double
  • Property Type As cdrNodeType

Methods:

  • Sub Add(ByVal Node As Node)
  • Sub AddRange(ByVal NodeRange As NodeRange)
  • Sub AutoReduce(ByVal PrecisionMargin As Double)
  • Sub BreakApart()
  • Sub Delete()
  • Sub Move([ByVal DeltaX As Double = 0], [ByVal DeltaY As Double = 0], [ByVal AnchorIndex As Long = 1], [ByVal ElasticMode As Boolean = False])
  • Sub Remove(ByVal Index As Long)
  • Sub RemoveAll()
  • Sub Rotate(ByVal Angle As Double, [ByVal UseReferencePoint As Boolean = True], [ByVal RotationCenterX As Double = 0], [ByVal RotationCenterY As Double = 0])
  • Sub SetType(ByVal Type As cdrNodeType)
  • Sub Skew([ByVal AngleX As Double = 0], [ByVal AngleY As Double = 0], [ByVal UseReferencePoint As Boolean = True], [ByVal SkewAnchorX As Double = 0], [ByVal SkewAnchorY As Double = 0])
  • Sub Smoothen(ByVal Smoothness As Long)
  • Sub Stretch([ByVal RatioX As Single = 100], [ByVal RatioY As Single = 100], [ByVal UseReferencePoint As Boolean = True], [ByVal StretchAnchorX As Double = 0], [ByVal StretchAnchorY As Double = 0])

Class Nodes

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As Node
  • Property Parent As Shape

Methods:

  • Function All() As NodeRange
  • Function AllExcluding(ByRef IndexArray() As Variant) As NodeRange
  • Function Range(ByRef IndexArray() As Variant) As NodeRange

Class Outline

Properties:

  • Property BehindFill As Boolean
  • Property EndArrow As ArrowHead
  • Property LineCaps As cdrOutlineLineCaps
  • Property LineJoin As cdrOutlineLineJoin
  • Property NibAngle As Double
  • Property NibStretch As Long
  • Property ScaleWithShape As Boolean
  • Property StartArrow As ArrowHead
  • Property Style As OutlineStyle

Methods:

  • Function Sub ConvertToObject() As Shape
  • Sub SetProperties(ByVal Width As Double, [ByVal Style As OutlineStyle = Nothing], [ByVal Color As Color = Nothing], [ByVal StartArrow As ArrowHead = Nothing], [ByVal EndArrow As ArrowHead = Nothing], [ByVal BehindFill As Boolean = False], [ByVal ScaleWithShape As Boolean = False], [ByVal LineCaps As cdrOutlineLineCaps = cdrOutlineButtLineCaps (0)], [ByVal LineJoin As cdrOutlineLineJoin = cdrOutlineMiterLineJoin (0)], [ByVal NibAngle As Double = 0], [ByVal NibStretch As Long = 100])

Class OutlineStyle

Properties:

  • Property DashCount As Long
  • Property DashLength(ByVal Index As Long) As Long
  • Property GapLength(ByVal Index As Long) As Long
  • Property Index As Long

Class OutlineStyles

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As OutlineStyle
  • Property Parent As Application

Methods:

  • Function Add() As OutlineStyle
  • Function AddStyle(ByVal Style As OutlineStyle) As OutlineStyle
  • Sub Remove(ByVal Index As Long)
  • Sub Save()

Class Page

Properties:

  • Property Background As cdrPageBackground
  • Property Color As Color
  • Property Guides([ByVal Type As cdrGuideType = cdrAllGuides (-1)]) As ShapeRange
  • Property PrintExportBackground As Boolean
  • Property Properties As Properties

Methods:

  • Function FindShape([ByVal Name As String], [ByVal Type As cdrShapeType = cdrNoShape (0)], [ByVal StaticID As Long = 0], [ByVal Recursive As Boolean = True]) As Shape
  • Function FindShapes([ByVal Name As String], [ByVal Type As cdrShapeType = cdrNoShape (0)], [ByVal Recursive As Boolean = True]) As ShapeRange
  • Sub GetSize(ByRef Width As Double, ByRef Height As Double)
  • Sub MoveTo(ByVal Index As Long)
  • Function SelectShapesAtPoint(ByVal X As Double, ByVal Y As Double, ByVal SelectUnfilled As Boolean, [ByVal HotArea As Double = -1]) As Shape
  • Function SelectShapesFromRectangle(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal Touch As Boolean) As Shape
  • Sub SetSize(ByVal Width As Double, ByVal Height As Double)
  • Sub UnlockAllShapes()

Class Palette

Properties:

  • Property Application As ObjectApplication
  • Property PaletteID As cdrPaletteID
  • Property Parent As ObjectPalettes

Methods:

  • Sub Save()

Class Palettes

Properties:

  • Property Application As ObjectApplication
  • Property Parent As ObjectApplication

Class PatternCanvas

Properties:

  • Property Data As String
  • Property Height As Long
  • Property Index As Long
  • Property Pixel(ByVal X As Long, ByVal Y As Long) As Boolean
  • Property Size As cdrPatternCanvasSize
  • Property Width As Long

Methods:

  • Sub Clear()
  • Sub CopyArea(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal X As Long, ByVal Y As Long)
  • Sub FillArea(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, [ByVal State As Boolean = True])
  • Sub FlipArea(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal Axes As cdrFlipAxes)
  • Sub Line(ByVal Flags As Integer, ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal Color As Boolean)
  • Sub PSet(ByVal Step As Integer, ByVal X As Long, ByVal Y As Long, ByVal Color As Boolean)
  • Sub PutCopy(ByVal PatternCanvas As PatternCanvas)
  • Sub RotateArea(ByVal x1 As Long, ByVal y1 As Long, ByVal x2 As Long, ByVal y2 As Long, ByVal Angle As Double)
  • Sub Select(ByVal Index As Long)

Class PatternCanvases

Properties:

  • Property Count As Long
  • Property Item(ByVal Index As Long) As PatternCanvas

Methods:

  • Function Add(ByVal PatternCanvas As PatternCanvas) As Long
  • Sub Remove(ByVal Index As Long)

Class PatternFill

Properties:

  • Property BackColor As Color
  • Property Canvas As PatternCanvas
  • Property FilePath As String
  • Property FrontColor As Color
  • Property MirrorFill As Boolean
  • Property OriginX As Double
  • Property OriginY As Double
  • Property RotationAngle As Double
  • Property SkewAngle As Double
  • Property TileHeight As Double
  • Property TileOffset As Long
  • Property TileOffsetType As cdrTileOffsetType
  • Property TileWidth As Double
  • Property TransformWithShape As Boolean
  • Property Type As cdrPatternFillType

Methods:

  • Function Load(ByVal FileName As String) As Boolean

Class PDFVBASettings

Properties:

  • Property Author As String
  • Property BitmapCompression As pdfBitmapCompressionType
  • Property Bleed As Integer
  • Property Bookmarks As Boolean
  • Property ColorMode As pdfColorMode
  • Property ColorProfile As pdfColorProfile
  • Property ColorResolution As Long
  • Property ComplexFillsAsBitmaps As Boolean
  • Property CompressText As Boolean
  • Property CropMarks As Boolean
  • Property DensitometerScales As Boolean
  • Property DownsampleColor As Boolean
  • Property DownsampleGray As Boolean
  • Property DownsampleMono As Boolean
  • Property EmbedBaseFonts As Boolean
  • Property EmbedFonts As Boolean
  • Property EPSAs As pdfEPSAs
  • Property FileInformation As Boolean
  • Property FountainSteps As Long
  • Property GetEmbedFile As Boolean
  • Property GetEmbedFilename As String
  • Property GetEncoding As pdfEncodingType
  • Property GrayResolution As Long
  • Property Halftones As Boolean
  • Property Hyperlinks As Boolean
  • Property IncludeBleed As Boolean
  • Property JPEGQualityFactor As Integer
  • Property Keywords As String
  • Property Linearize As Boolean
  • Property MaintainOPILinks As Boolean
  • Property MonoResolution As Long
  • Property Overprints As Boolean
  • Property PageRange As String
  • Property pdfVersion As pdfVersion
  • Property PublishRange As pdfExportRange
  • Property RegistrationMarks As Boolean
  • Property SetEmbedFile(ByVal Boolean)
  • Property SetEmbedFilename(ByVal String)
  • Property SetEncoding(ByVal pdfEncodingType)
  • Property SpotColors As Boolean
  • Property Startup As pdfDisplayOnStart
  • Property Subject As String
  • Property SubsetFonts As Boolean
  • Property SubsetPct As Long
  • Property TextAsCurves As Boolean
  • Property Thumbnails As Boolean
  • Property TrueTypeToType1 As Boolean
  • Property UseColorProfile As Boolean

Methods:

  • Function Load(ByVal SettingName As String) As Boolean
  • Sub Reset()
  • Function Save(ByVal SettingName As String) As Boolean
  • Function ShowDialog() As Boolean

Class Points

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As ShapePoint
  • Property Parent As Shape

Class PostScriptFill

Properties:

  • Property Index As Long
  • Property Name As String
  • Property Properties(ByVal Index As Long) As Long

Methods:

  • Sub Select(ByVal IndexOrName As Variant)
  • Sub SetProperties(ByVal Param1 As Long, [ByVal Param2 As Long = 0], [ByVal Param3 As Long = 0], [ByVal Param4 As Long = 0], [ByVal Param5 As Long = 0])

Class PowerClip

Properties:

  • Property Application As Application
  • Property ContentsLocked As Boolean
  • Property Parent As Shape
  • Property Shapes As Shapes

Methods:

  • Sub EnterEditMode()
  • Function ExtractShapes() As ShapeRange
  • Sub LeaveEditMode()

Class PrintDocuments

Properties:

  • Property Count As Long

Class Printer

Properties:

  • Property ColorEnabled As Boolean
  • Property Default As Boolean
  • Property Description As String
  • Property Name As String
  • Property Port As String
  • Property PostScriptEnabled As Boolean
  • Property Ready As Boolean
  • Property Type As String

Methods:

  • Sub ShowDialog()

Class Printers

Properties:

  • Property Count As Long
  • Property Default As Printer
  • Property Item(ByVal nIndex As Long) As Printer

Class PrintJob

Properties:

  • Property Documents As PrintDocuments
  • Property Pages As PrintPages
  • Property Settings As PrintSettings

Methods:

  • Sub AddDocument(ByVal Document As Document, [ByVal PageRange As String])
  • Sub Clear()
  • Sub PrintOut()

Class PrintOptions

Properties:

  • Property AppInfo As Boolean
  • Property BitmapColorMode As PrnBitmapColorMode
  • Property ColorMode As PrnColorMode
  • Property ColorResolution As Long
  • Property DownsampleColor As Boolean
  • Property DownsampleGray As Boolean
  • Property DownsampleMono As Boolean
  • Property DriverInfo As Boolean
  • Property FontInfo As Boolean
  • Property FountainSteps As Long
  • Property GrayResolution As Long
  • Property JobInformation As Boolean
  • Property LinkInfo As Boolean
  • Property MarksToPage As Boolean
  • Property MonoResolution As Long
  • Property PrintBitmaps As Boolean
  • Property PrintJobInfo As Boolean
  • Property PrintText As Boolean
  • Property PrintVectors As Boolean
  • Property RasterizePage As Boolean
  • Property RasterizeResolution As Long
  • Property SepsInfo As Boolean
  • Property TextInBlack As Boolean
  • Property UseColorProfile As Boolean

Class PrintPages

Properties:

  • Property Count As Long

Class PrintPostScript

Properties:

  • Property AutoIncreaseFlatness As Boolean
  • Property AutoIncreaseFountainSteps As Boolean
  • Property ConformToDSC As Boolean
  • Property DownloadType1 As Boolean
  • Property Flatness As Long
  • Property JPEGCompression As Boolean
  • Property JPEGQuality As Long
  • Property Level As PrnPostScriptLevel
  • Property MaintainOPILinks As Boolean
  • Property MaxPointsPerCurve As Long
  • Property OptimizeFountainFills As Boolean
  • Property PDFBookmarks As Boolean
  • Property PDFHyperlinks As Boolean
  • Property PDFStartup As PrnPDFStartup
  • Property ResolveDCSLinks As Boolean
  • Property ScreenFrequency As Long
  • Property TrueTypeToType1 As Boolean

Class PrintPrepress

Properties:

  • Property ColorCalibrationBar As Boolean
  • Property CropMarks As Boolean
  • Property Densities(ByVal Index As Long) As Long
  • Property DensitometerScale As Boolean
  • Property ExteriorCropMarks As Boolean
  • Property FileInfo As Boolean
  • Property InfoWithinPage As Boolean
  • Property Invert As Boolean
  • Property JobName As String
  • Property Mirror As Boolean
  • Property PageNumbers As Boolean
  • Property RegistrationMarks As Boolean
  • Property RegistrationStyle As PrnRegistrationStyle

Class PrintSeparations

Properties:

  • Property AdvancedSettings As Boolean
  • Property AlwaysOverprintBlack As Boolean
  • Property AutoSpreadAmount As Double
  • Property AutoSpreadFixed As Boolean
  • Property AutoSpreading As Boolean
  • Property AutoSpreadTextAbove As Double
  • Property BasicScreen As String
  • Property EmptyPlates As Boolean
  • Property Enabled As Boolean
  • Property HalftoneType As String
  • Property Hexachrome As Boolean
  • Property InColor As Boolean
  • Property Plates As SeparationPlates
  • Property PreserveOverprints As Boolean
  • Property Resolution As Long
  • Property ScreenTechnology As String
  • Property SpotToCMYK As Boolean

Class PrintSettings

Properties:

  • Property Collate As Boolean
  • Property Copies As Long
  • Property FileMode As PrnFileMode
  • Property FileName As String
  • Property ForMac As Boolean
  • Property Options As PrintOptions
  • Property PageRange As String
  • Property PostScript As PrintPostScript
  • Property PPDFile As String
  • Property Prepress As PrintPrepress
  • Property Printer As Printer
  • Property PrintRange As PrnPrintRange
  • Property PrintToFile As Boolean
  • Property Separations As PrintSeparations
  • Property Trapping As PrintTrapping
  • Property UsePPD As Boolean

Methods:

  • Function Load(ByVal FileName As String) As Boolean
  • Sub Reset()
  • Function Save(ByVal FileName As String) As Boolean
  • Function ShowDialog() As Boolean

Class PrintTrapping

Properties:

  • Property BlackColorLimit As Long
  • Property BlackDensityLimit As Double
  • Property BlackWidth As Double
  • Property ColorScaling As Long
  • Property Enabled As Boolean
  • Property ImageTrap As PrnImageTrap
  • Property InternalImageTrapping As Boolean
  • Property Layers As TrapLayers
  • Property MinResolution As Long
  • Property ObjectsToImage As Boolean
  • Property SlidingTrapLimit As Long
  • Property StepLimit As Long
  • Property Width As Double

Class Properties

Properties:

  • Property Count As Long
  • Property Index(ByVal Name As String, ByVal ID As Long) As Long
  • Property Item(ByVal Name As String, ByVal ID As Long) As Variant
  • Property ItemByIndex(ByVal Index As Long) As Variant

Methods:

  • Sub Delete(ByVal Name As String, ByVal ID As Long)
  • Sub DeleteByIndex(ByVal Index As Long)
  • Sub Description(ByVal Index As Long, ByRef Name As String, ByRef ID As Long)
  • Sub GetFile(ByVal Name As String, ByVal ID As Long, ByVal FileName As String)
  • Sub PutFile(ByVal Name As String, ByVal ID As Long, ByVal FileName As String)

Class RecentFile

Properties:

  • Property Application As Object
  • Property FullName As String
  • Property Index As Long
  • Property Name As String
  • Property Parent As RecentFiles
  • Property Path As String

Methods:

  • Sub Delete()
  • Function Open() As Object

Class RecentFiles

Properties:

  • Property Application As Object
  • Property Count As Long
  • Property Item(ByVal Index As Long) As RecentFile
  • Property Maximum As Long
  • Property Parent As Object

Methods:

  • Function Add(ByVal Name As String, ByVal Path As String) As RecentFile

Class Rectangle

Properties:

  • Property EqualCorners As Boolean
  • Property MaxRadius As Double
  • Property RadiusLowerLeft As Double
  • Property RadiusLowerRight As Double
  • Property RadiusUpperLeft As Double
  • Property RadiusUpperRight As Double

Methods:

  • Sub SetRadius(ByVal Radius As Double)
  • Sub SetRoundness(ByVal Roundness As Long)

Class Rulers

Properties:

  • Property Application As Application
  • Property HUnits As cdrUnit
  • Property Parent As Document
  • Property VUnits As cdrUnit

Class Segment

Properties:

  • Property AbsoluteIndex As Long
  • Property Application As Application
  • Property EndingControlPointAngle As Double
  • Property EndingControlPointLength As Double
  • Property EndingControlPointX As Double
  • Property EndingControlPointY As Double
  • Property EndNode As Node
  • Property Index As Long
  • Property Length As Double
  • Property Parent As Shape
  • Property StartingControlPointAngle As Double
  • Property StartingControlPointLength As Double
  • Property StartingControlPointX As Double
  • Property StartingControlPointY As Double
  • Property StartNode As Node
  • Property SubPath As SubPath
  • Property SubPathIndex As Long
  • Property Type As cdrSegmentType

Methods:

  • Function AddNodeAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Node
  • Function BreakApartAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Node
  • Function FindParamOffset(ByVal AbsoluteOffset As Double, ByRef ParamOffset As Double, [ByRef Remainder As Double]) As Boolean
  • Function GetAbsoluteOffset(ByVal ParamOffset As Double) As Double
  • Function GetBendPoints(ByRef Offset1 As Double, ByRef Offset2 As Double, [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Long
  • Function GetCurvatureAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Double
  • Function GetCurveSpeedAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Double
  • Function GetIntersections(ByVal Target As Segment, [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As CrossPoints
  • Function GetPeaks(ByVal Angle As Double, ByRef Offset1 As Double, ByRef Offset2 As Double, [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Long
  • Function GetPerpendicularAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Double
  • Sub GetPointPositionAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)], ByRef X As Double, ByRef Y As Double)
  • Function GetTangentAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrParamSegmentOffset (2)]) As Double
  • Function Next() As Segment
  • Function Previous() As Segment

Class SegmentRange

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As Segment
  • Property Length As Double
  • Property NodeRange As NodeRange
  • Property Parent As Shape
  • Property Type As cdrSegmentType

Methods:

  • Sub Add(ByVal Segment As Segment)
  • Sub AddNode()
  • Sub AddRange(ByVal SegmentRange As SegmentRange)
  • Sub Remove(ByVal Index As Long)
  • Sub RemoveAll()
  • Sub SetType(ByVal Type As cdrSegmentType)

Class Segments

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As Segment
  • Property Parent As Shape

Methods:

  • Function All() As SegmentRange
  • Function AllExcluding(ByRef IndexArray() As Variant) As SegmentRange
  • Function Range(ByRef IndexArray() As Variant) As SegmentRange

Class SeparationPlate

Properties:

  • Property Angle As Double
  • Property Color As String
  • Property Enabled As Boolean
  • Property Frequency As Double
  • Property OverprintGraphic As Boolean
  • Property OverprintText As Boolean
  • Property Type As PrnPlateType

Class SeparationPlates

Properties:

  • Property Count As Long
  • Property Item(ByVal Index As Long) As SeparationPlate

Class Shape

Properties:

  • Property AbsoluteHScale As Double
  • Property AbsoluteSkew As Double
  • Property AbsoluteVScale As Double
  • Property CloneLink As CloneLink
  • Property Clones As ShapeRange
  • Property Connector As Connector
  • Property DrapeFill As Boolean
  • Property Effect As Effect
  • Property Effects As Effects
  • Property Guide As Guide
  • Property Locked As Boolean
  • Property Next([ByVal Level As cdrShapeLevel = cdrLevelPage (3)], [ByVal EnterGroups As Boolean = False], [ByVal Loop As Boolean = True]) As Shape
  • Property ObjectData As DataItems
  • Property OriginalHeight As Double
  • Property OriginalWidth As Double
  • Property OverprintFill As Boolean
  • Property OverprintOutline As Boolean
  • Property ParentGroup As Shape
  • Property Points As Points
  • Property PowerClip As PowerClip
  • Property PowerClipParent As Shape
  • Property Previous([ByVal Level As cdrShapeLevel = cdrLevelPage (3)], [ByVal EnterGroups As Boolean = False], [ByVal Loop As Boolean = True]) As Shape
  • Property Properties As Properties
  • Property Select As Boolean
  • Property Selected As Boolean
  • Property Transparency As Transparency
  • Property URL As URL

Methods:

  • Sub AddToPowerClip(ByVal Shape As Shape)
  • Sub AddToSelection()
  • Sub BreakApart()
  • Sub ClearEffect(ByVal Type As cdrEffectType)
  • Function Clone([ByVal OffsetX As Double = 0], [ByVal OffsetY As Double = 0]) As Shape
  • Function Combine() As Shape
  • Function ConvertToBitmapEx([ByVal Mode As cdrImageType = cdrRGBColorImage (4)], [ByVal Dithered As Boolean = False], [ByVal Transparent As Boolean = False], [ByVal Resolution As Long = 72], [ByVal AntiAliasing As cdrAntiAliasingType = cdrNormalAntiAliasing (1)], [ByVal UseColorProfile As Boolean = True]) As Shape
  • Sub Copy()
  • Function CreateArrowHead() As ArrowHead
  • Function CreateBlend(ByVal Shape As Shape, [ByVal Steps As Integer = 20], [ByVal ColorBlendType As cdrFountainFillBlendType = cdrDirectFountainFillBlend (0)], [ByVal Mode As cdrBlendMode = cdrBlendSteps (0)], [ByVal Spacing As Integer = 1], [ByVal Angle As Double = 0], [ByVal Loop As Boolean = False], [ByVal Path As Shape = Nothing], [ByVal RotateShapes As Boolean = False], [ByVal SpacingAccel As Long = 0], [ByVal ColorAccel As Long = 0], [ByVal AccelSize As Boolean = False]) As Effect
  • Function CreateContour([ByVal Direction As cdrContourDirection = cdrContourOutside (1)], [ByVal Offset As Double = 0.150000005960464], [ByVal Steps As Long = 1], [ByVal BlendType As cdrFountainFillBlendType = cdrDirectFountainFillBlend (0)], [ByVal OutlineColor As Color = Nothing], [ByVal FillColor As Color = Nothing], [ByVal FillColor2 As Color = Nothing], [ByVal SpacingAccel As Long = 0], [ByVal ColorAccel As Long = 0]) As Effect
  • Function CreateDropShadow([ByVal Type As cdrDropShadowType = cdrDropShadowFlat (0)], [ByVal Opacity As Long = 50], [ByVal Feather As Long = 15], [ByVal OffsetX As Double = 0], [ByVal OffsetY As Double = 0], [ByVal Color As Color = Nothing], [ByVal FeatherType As cdrFeatherType = cdrFeatherAverage (3)], [ByVal FeatherEdge As cdrEdgeType = cdrEdgeLinear (0)], [ByVal PerspectiveAngle As Double = -45], [ByVal PerspectiveStretch As Double = 1], [ByVal Fade As Long = 1]) As Effect
  • Function CreateEnvelope(ByVal PresetIndex As Long, [ByVal Mode As cdrEnvelopeMode = cdrEnvelopePutty (2)], [ByVal KeepLines As Boolean = False]) As Effect
  • Function CreateExtrude(ByVal Type As cdrExtrudeType, ByVal VPType As cdrExtrudeVPType, ByVal VPX As Double, ByVal VPY As Double, [ByVal Depth As Double = 20], [ByVal Shading As cdrExtrudeShading = cdrExtrudeObjectFill (0)], [ByVal BaseColor As Color = Nothing], [ByVal ShadingColor As Color = Nothing], [ByVal BevelDepth As Double = 0], [ByVal BevelAngle As Double = 45], [ByVal BevelColor As Color = Nothing], [ByVal BevelOnly As Boolean = False]) As Effect
  • Function CreateLens(ByVal Type As cdrLensType, [ByVal RateOrMagnification As Double = 50], [ByVal Color1 As Color = Nothing], [ByVal Color2 As Color = Nothing], [ByVal ColorMapPalette As cdrFountainFillBlendType = cdrDirectFountainFillBlend (0)]) As Effect
  • Function CreatePerspective([ByVal HorizVanishPointX As Variant], [ByVal HorizVanishPointY As Variant], [ByVal VertVanishPointX As Variant], [ByVal VertVanishPointY As Variant]) As Effect
  • Function CreatePushPullDistortion(ByVal OriginX As Double, ByVal OriginY As Double, ByVal Amplitude As Long) As Effect
  • Sub CreateSelection()
  • Function CreateTwisterDistortion(ByVal OriginX As Double, ByVal OriginY As Double, ByVal Angle As Double) As Effect
  • Function CreateZipperDistortion(ByVal OriginX As Double, ByVal OriginY As Double, ByVal Amplitude As Long, ByVal Frequency As Long, [ByVal Random As Boolean = False], [ByVal Smooth As Boolean = False], [ByVal Local As Boolean = False]) As Effect
  • Sub Cut()
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub GetBoundingBox(ByRef X As Double, ByRef Y As Double, ByRef Width As Double, ByRef Height As Double, [ByVal UseOutline As Boolean = False])
  • Sub GetMatrix(ByRef d11 As Double, ByRef d12 As Double, ByRef d21 As Double, ByRef d22 As Double, ByRef tx As Double, ByRef ty As Double)
  • Sub GetPosition(ByRef PositionX As Double, ByRef PositionY As Double)
  • Sub GetSize(ByRef Width As Double, ByRef Height As Double)
  • Function Sub Group() As Shape
  • Function Intersect(ByVal TargetShape As Shape, [ByVal LeaveSource As Boolean = True], [ByVal LeaveTarget As Boolean = True]) As Shape
  • Function IsOnShape(ByVal X As Double, ByVal Y As Double, [ByVal HotArea As Double = -1]) As cdrPositionOfPointOverShape
  • Sub OrderReverse()
  • Sub RemoveFromContainer([ByVal Level As Long = 0])
  • Sub RemoveFromSelection()
  • Sub RotateEx(ByVal Angle As Double, ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub SetBoundingBox(ByVal X As Double, ByVal Y As Double, ByVal Width As Double, ByVal Height As Double, [ByVal KeepAspect As Boolean = False], [ByVal ReferencePoint As cdrReferencePoint = cdrCenter (9)])
  • Sub SetMatrix(ByVal d11 As Double, ByVal d12 As Double, ByVal d21 As Double, ByVal d22 As Double, ByVal tx As Double, ByVal ty As Double)
  • Sub SetPosition(ByVal PositionX As Double, ByVal PositionY As Double)
  • Sub SetRotationCenter(ByVal X As Double, ByVal Y As Double)
  • Sub SetSize([ByVal Width As Double = 0], [ByVal Height As Double = 0])
  • Sub SetSizeEx([ByVal Width As Double = 0], [ByVal Height As Double = 0], ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub SkewEx(ByVal AngleX As Double, ByVal AngleY As Double, ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub Stretch(ByVal StretchX As Double, [ByVal StretchY As Double = 0], [ByVal StretchCharactersSize As Boolean = False])
  • Sub StretchEx(ByVal StretchX As Double, [ByVal StretchY As Double = 0], ByVal CenterX As Double, ByVal CenterY As Double, [ByVal StretchCharactersSize As Boolean = False])
  • Function Trim(ByVal TargetShape As Shape, [ByVal LeaveSource As Boolean = True], [ByVal LeaveTarget As Boolean = False]) As Shape
  • Function Weld(ByVal TargetShape As Shape, [ByVal LeaveSource As Boolean = False], [ByVal LeaveTarget As Boolean = False]) As Shape

Class ShapePoint

Properties:

  • Property Application As Application
  • Property Node As Node
  • Property Parent As Shape
  • Property PositionX As Double
  • Property PositionY As Double
  • Property Type As cdrPointType

Class ShapeRange

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As Shape
  • Property Parent As Application
  • Property PositionX As Double
  • Property PositionY As Double
  • Property RotationCenterX As Double
  • Property RotationCenterY As Double
  • Property SizeHeight As Double
  • Property SizeWidth As Double

Methods:

  • Sub Add(ByVal Shape As Shape)
  • Sub AddRange(ByVal ShapeRange As ShapeRange)
  • Sub AddToPowerClip(ByVal Shape As Shape)
  • Sub AddToSelection()
  • Sub ApplyFountainFill([ByVal StartColor As Color = Nothing], [ByVal EndColor As Color = Nothing], [ByVal Type As cdrFountainFillType = cdrLinearFountainFill (1)], [ByVal Angle As Double = 0], [ByVal Steps As Long = 0], [ByVal EdgePad As Long = 0], [ByVal MidPoint As Long = 50], [ByVal BlendType As cdrFountainFillBlendType = cdrDirectFountainFillBlend (0)])
  • Sub ApplyNoFill()
  • Sub ApplyPatternFill(ByVal Type As cdrPatternFillType, [ByVal FileName As String = ""], [ByVal PatternCanvasIndex As Long = 1], [ByVal FrontColor As Color = Nothing], [ByVal EndColor As Color = Nothing], [ByVal TransformWithShape As Boolean = False])
  • Sub ApplyPostscriptFill(ByVal IndexOrName As Variant)
  • Sub ApplyTextureFill(ByVal TextureName As String, [ByVal LibraryName As String = ""])
  • Sub ApplyUniformFill(ByVal Color As Color)
  • Function Clone([ByVal OffsetX As Double = 0], [ByVal OffsetY As Double = 0]) As ShapeRange
  • Function Combine() As Shape
  • Sub ConvertOutlineToObject()
  • Function ConvertToBitmap([ByVal BitDepth As Long = 24], [ByVal Grayscale As Boolean = False], [ByVal Dithered As Boolean = True], [ByVal TransparentBG As Boolean = True], [ByVal Resolution As Long = 72], [ByVal AntiAliasing As cdrAntiAliasingType = cdrNormalAntiAliasing (1)], [ByVal UseColorProfile As Boolean = True]) As Shape
  • Function ConvertToBitmapEx([ByVal Mode As cdrImageType = cdrRGBColorImage (4)], [ByVal Dithered As Boolean = False], [ByVal Transparent As Boolean = False], [ByVal Resolution As Long = 72], [ByVal AntiAliasing As cdrAntiAliasingType = cdrNormalAntiAliasing (1)], [ByVal UseColorProfile As Boolean = True]) As Shape
  • Sub ConvertToCurves()
  • Sub Copy()
  • Sub CreateSelection()
  • Sub Cut()
  • Sub Delete()
  • Function Duplicate([ByVal OffsetX As Double = 0], [ByVal OffsetY As Double = 0]) As ShapeRange
  • Sub Flip(ByVal Axes As cdrFlipAxes)
  • Sub GetBoundingBox(ByRef X As Double, ByRef Y As Double, ByRef Width As Double, ByRef Height As Double, [ByVal UseOutline As Boolean = False])
  • Sub GetPosition(ByRef PositionX As Double, ByRef PositionY As Double)
  • Sub GetSize(ByRef Width As Double, ByRef Height As Double)
  • Function Group() As Shape
  • Function IndexOf(ByVal Shape As Shape) As Long
  • Sub Move(ByVal DeltaX As Double, ByVal DeltaY As Double)
  • Sub OrderBackOf(ByVal Shape As Shape)
  • Sub OrderBackOne()
  • Sub OrderForwardOne()
  • Sub OrderFrontOf(ByVal Shape As Shape)
  • Sub OrderReverse()
  • Sub OrderToBack()
  • Sub OrderToFront()
  • Sub Remove(ByVal Index As Long)
  • Sub RemoveAll()
  • Sub RemoveFromContainer([ByVal Level As Long = 0])
  • Sub RemoveFromSelection()
  • Sub Rotate(ByVal Angle As Double)
  • Sub RotateEx(ByVal Angle As Double, ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub SetBoundingBox(ByVal X As Double, ByVal Y As Double, ByVal Width As Double, ByVal Height As Double, [ByVal KeepAspect As Boolean = False], [ByVal ReferencePoint As cdrReferencePoint = cdrCenter (9)])
  • Sub SetOutlineProperties(ByVal Width As Double, [ByVal Style As OutlineStyle = Nothing], [ByVal Color As Color = Nothing], [ByVal StartArrow As ArrowHead = Nothing], [ByVal EndArrow As ArrowHead = Nothing], [ByVal BehindFill As Boolean = False], [ByVal ScaleWithShape As Boolean = False], [ByVal LineCaps As cdrOutlineLineCaps = cdrOutlineButtLineCaps (0)], [ByVal LineJoin As cdrOutlineLineJoin = cdrOutlineMiterLineJoin (0)], [ByVal NibAngle As Double = 0], [ByVal NibStretch As Long = 100])
  • Sub SetPosition(ByVal PositionX As Double, ByVal PositionY As Double)
  • Sub SetRotationCenter(ByVal X As Double, ByVal Y As Double)
  • Sub SetSize([ByVal Width As Double = 0], [ByVal Height As Double = 0])
  • Sub SetSizeEx([ByVal Width As Double = 0], [ByVal Height As Double = 0], ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub Skew(ByVal AngleX As Double, ByVal AngleY As Double)
  • Sub SkewEx(ByVal AngleX As Double, ByVal AngleY As Double, ByVal CenterX As Double, ByVal CenterY As Double)
  • Sub Stretch(ByVal StretchX As Double, [ByVal StretchY As Double = 0], [ByVal StretchCharactersSize As Boolean = False])
  • Sub StretchEx(ByVal StretchX As Double, [ByVal StretchY As Double = 0], ByVal CenterX As Double, ByVal CenterY As Double, [ByVal StretchCharactersSize As Boolean = False])
  • Sub UngroupAll()

Class Shapes

Methods:

  • Function All() As ShapeRange
  • Function AllExcluding(ByRef IndexArray() As Variant) As ShapeRange
  • Function Range(ByRef IndexArray() As Variant) As ShapeRange

Class StructExportOptions

Properties:

  • Property Compression As cdrCompressionType
  • Property Dithered As Boolean
  • Property Transparent As Boolean
  • Property UseColorProfile As Boolean

Class StructFontProperties

Properties:

  • Property Fill As Fill
  • Property Outline As Outline

Class StructPaletteOptions

Properties:

  • Property ColorSensitive As Boolean
  • Property DitherIntensity As Long
  • Property DitherType As cdrDitherType
  • Property Importance As Long
  • Property Lightness As Long
  • Property NumColors As Long
  • Property PaletteType As cdrImagePaletteType
  • Property Smoothing As Long
  • Property TargetColor As Long
  • Property ToleranceA As Long
  • Property ToleranceB As Long

Class SubPath

Properties:

  • Property Application As Application
  • Property Closed As Boolean
  • Property EndNode As Node
  • Property FirstSegment As Segment
  • Property Index As Long
  • Property LastSegment As Segment
  • Property Length As Double
  • Property Nodes As Nodes
  • Property Parent As Shape
  • Property PositionX As Double
  • Property PositionY As Double
  • Property Segments As Segments
  • Property SizeHeight As Double
  • Property SizeWidth As Double
  • Property StartNode As Node

Methods:

  • Function AddNodeAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Node
  • Function AppendCurveSegment([ByVal AppendAtBeginning As Boolean = False], ByVal X As Double, ByVal Y As Double, [ByVal StartingControlPointLength As Double = -1], [ByVal StartingControlPointAngle As Double = 0], [ByVal EndingControlPointLength As Double = -1], [ByVal EndingControlPointAngle As Double = 0]) As Segment
  • Function AppendLineSegment([ByVal AppendAtBeginning As Boolean = False], ByVal X As Double, ByVal Y As Double) As Segment
  • Function BreakApartAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Node
  • Sub Delete()
  • Function Extract([ByRef OldCurve As Shape]) As Shape
  • Function FindSegmentOffset(ByVal AbsoluteOffset As Double, ByRef Segment As Segment, ByRef ParamOffset As Double, [ByRef Remainder As Double]) As Boolean
  • Function GetCurvatureAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Double
  • Function GetCurveSpeedAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Double
  • Function GetIntersections(ByVal Target As SubPath, [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As CrossPoints
  • Function GetPerpendicularAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Double
  • Sub GetPointPositionAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)], ByRef X As Double, ByRef Y As Double)
  • Sub GetPosition(ByRef PositionX As Double, ByRef PositionY As Double)
  • Function GetSegmentAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)], [ByRef SegmentOffset As Double]) As Segment
  • Function GetTangentAt([ByVal Offset As Double = 0.5], [ByVal OffsetType As cdrSegmentOffsetType = cdrRelativeSegmentOffset (1)]) As Double
  • Function IsOnSubPath(ByVal X As Double, ByVal Y As Double, [ByVal HotArea As Double = -1]) As cdrPositionOfPointOverShape
  • Sub Move([ByVal DeltaX As Double = 0], [ByVal DeltaY As Double = 0])
  • Function Next() As SubPath
  • Function Previous() As SubPath
  • Sub ReverseDirection()
  • Function Selection() As NodeRange
  • Sub SetPosition(ByVal PositionX As Double, ByVal PositionY As Double)

Class Subpaths

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal Index As Long) As SubPath
  • Property Parent As Shape

Class Text

Properties:

  • Property AlignPropertiesInRange(ByVal StartIndex As Long, ByVal CountSize As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructAlignProperties
  • Property Characters(ByVal StartIndex As Long, [ByVal CountSize As Long = 1]) As String
  • Property FittedDistanceFromPath As Double
  • Property FittedHorizOffset As Double
  • Property FittedOrientation As cdrFittedOrientation
  • Property FittedPlacement As cdrFittedPlacement
  • Property FittedPlaceOnOtherSide As Boolean
  • Property FittedQuadrant As cdrFittedQuadrant
  • Property FittedVertPlacement As cdrFittedVertPlacement
  • Property FontPropertiesInRange(ByVal StartIndex As Long, ByVal CountSize As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructFontProperties
  • Property HyphenationSettingsInRange(ByVal StartIndex As Long, ByVal CountSize As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructHyphenationSettings
  • Property IsHTMLCompatible As Boolean
  • Property Paragraphs(ByVal StartIndex As Long, [ByVal CountSize As Long = 1]) As String
  • Property SpacePropertiesInRange(ByVal StartIndex As Long, ByVal CountSize As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructSpaceProperties
  • Property Words(ByVal StartIndex As Long, [ByVal CountSize As Long = 1]) As String

Methods:

  • Sub ExportToFile(ByVal FileName As String, ByVal StartIndex As Long, ByVal CountSize As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)])
  • Function MakeHTMLCompatible(ByVal HTML As Boolean) As Boolean

Class TextureFill

Properties:

  • Property LibraryName As String
  • Property MaximumTileWidth As Long
  • Property MirrorFill As Boolean
  • Property OriginX As Double
  • Property OriginY As Double
  • Property Properties As TextureFillProperties
  • Property Resolution As Long
  • Property RotationAngle As Double
  • Property SkewAngle As Double
  • Property StyleName As String
  • Property TextureName As String
  • Property TileHeight As Double
  • Property TileOffset As Long
  • Property TileOffsetType As cdrTileOffsetType
  • Property TileWidth As Double
  • Property TransformWithShape As Boolean

Methods:

  • Sub Select(ByVal Texture As String, [ByVal Library As String = ""])
  • Sub SetProperties(ByRef SettingArray() As Variant)

Class TextureFillProperties

Properties:

  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As TextureFillProperty

Class TextureFillProperty

Properties:

  • Property Name As String
  • Property Type As cdrTexturePropertyType
  • Property Value As Variant

Class Transparency

Properties:

  • Property Application As Object
  • Property AppliedTo As cdrTransparencyAppliedTo
  • Property End As Long
  • Property Fountain As FountainFill
  • Property Frozen As Boolean
  • Property Parent As Object
  • Property Pattern As PatternFill
  • Property Start As Long
  • Property Texture As TextureFill
  • Property Type As cdrTransparencyType
  • Property Uniform As Long

Methods:

  • Function ApplyFountainTransparency([ByVal Start As Long = 0], [ByVal End As Long = 100], [ByVal Type As cdrFountainFillType = cdrLinearFountainFill (1)], [ByVal Angle As Double = 0], [ByVal Steps As Long = 0], [ByVal EdgePad As Long = 0], [ByVal MidPoint As Long = 50]) As FountainFill
  • Sub ApplyNoTransparency()
  • Function ApplyPatternTransparency(ByVal Type As cdrPatternFillType, [ByVal FileName As String = "0"], [ByVal PatternCanvasIndex As Long = 1], [ByVal Front As Long = 0], [ByVal Back As Long = 100], [ByVal TransformWithShape As Boolean = False]) As PatternFill
  • Function ApplyTextureTransparency(ByVal TextureName As String, [ByVal LibraryName As String = "0"]) As TextureFill
  • Sub ApplyUniformTransparency(ByVal Value As Long)
  • Sub Freeze()
  • Sub Unfreeze()

Class TrapLayer

Properties:

  • Property Color As String
  • Property Density As Double
  • Property Order As Long
  • Property TrapType As PrnTrapType
  • Property Type As PrnPlateType

Class TrapLayers

Properties:

  • Property Count As Long
  • Property Item(ByVal Index As Long) As TrapLayer

Class URL

Properties:

  • Property Address As String
  • Property AltComment As String
  • Property BookMark As String
  • Property Region As cdrURLRegion
  • Property TargetFrame As String

Class View

Properties:

  • Property Application As Application
  • Property Name As String
  • Property OriginX As Double
  • Property OriginY As Double
  • Property Page As Page
  • Property Parent As Views
  • Property UsePage As Boolean
  • Property UseZoom As Boolean
  • Property Zoom As Double

Methods:

  • Sub Activate()
  • Sub Delete()

Class Views

Properties:

  • Property Application As Application
  • Property Count As Long
  • Property Item(ByVal IndexOrName As Variant) As View
  • Property Parent As Document

Methods:

  • Function AddActiveView(ByVal Name As String) As View

Class Window

Properties:

  • Property Active As Boolean
  • Property ActiveView As ActiveView
  • Property Application As ObjectApplication
  • Property Caption As String
  • Property Document As Document
  • Property Height As Long
  • Property Index As Long
  • Property Left As Long
  • Property Name As String
  • Property Next As Window
  • Property Page As ObjectPage
  • Property Previous As Window
  • Property Top As Long
  • Property Type As cdrViewType
  • Property Width As Long
  • Property WindowState As cdrWindowState

Methods:

  • Function NewWindow() As Window
  • Sub Refresh()
  • Sub ZoomFitToAllObjects()
  • Sub ZoomFitToPage()
  • Sub ZoomFitToPageHeight()
  • Sub ZoomFitToPageWidth()
  • Sub ZoomFitToRectangle(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double)
  • Sub ZoomFitToSelection()
  • Sub ZoomFitToShape(ByVal Shape As Shape)

Class Windows

Properties:

  • Property Application As ObjectApplication
  • Property Parent As ObjectApplication

Methods:

  • Sub Arrange(ByVal Style As cdrWindowArrangeStyle)
  • Sub CloseAll()
  • Sub Refresh()

Class Workspace

Properties:

  • Property Active As Boolean
  • Property Application As ObjectApplication
  • Property Current As Boolean

Class Workspaces

Properties:

  • Property Application As ObjectApplication
  • Property Parent As ObjectApplication

Enum cdrAddinFilter

Constants:

  • cdrAddinFilterNone As Long=0
  • cdrAddinFilterWhileDrawing As Long=1
  • cdrAddinFilterShapeCreated As Long=2
  • cdrAddinFilterNew As Long=4
  • cdrAddinFilterExecute As Long=8

Enum cdrAlignment

Constants:

  • cdrMixedAlignment As Long=6

Enum cdrBlendMode

Constants:

  • cdrBlendSteps As Long=0
  • cdrBlendSpacing As Long=1

Enum cdrColorType

Constants:

  • 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 cdrCompressionType

Constants:

  • cdrCompressionNone As Long=0
  • cdrCompressionLZW As Long=1
  • cdrCompressionPackBits As Long=2
  • cdrCompressionHuffman As Long=3
  • cdrCompressionCCITT3_1d As Long=4
  • cdrCompressionCCITT3_2d As Long=5
  • cdrCompressionCCITT4 As Long=6
  • cdrCompressionRLE_LW As Long=7
  • cdrCompressionJPEG As Long=8

Enum cdrContourDirection

Constants:

  • cdrContourInside As Long=0
  • cdrContourOutside As Long=1
  • cdrContourToCenter As Long=2

Enum cdrCursorShape

Constants:

  • cdrCursorWinAppStarting As Long=0
  • cdrCursorWinArrow As Long=1
  • cdrCursorWinCross As Long=2
  • cdrCursorWinHelp As Long=3
  • cdrCursorWinIbeam As Long=4
  • cdrCursorWinNo As Long=5
  • cdrCursorWinSizeAll As Long=6
  • cdrCursorWinSizeNeSw As Long=7
  • cdrCursorWinSizeNs As Long=8
  • cdrCursorWinSizeNwSe As Long=9
  • cdrCursorWinSizeWe As Long=10
  • cdrCursorWinUpArrow As Long=11
  • cdrCursorWinWait As Long=12
  • cdrCursorSmallcrosshair As Long=1
  • cdrCursorPick As Long=5
  • cdrCursorNodeEdit As Long=6
  • cdrCursorEyeDrop As Long=34
  • cdrCursorExtPick As Long=60
  • cdrCursorPickNone As Long=79
  • cdrCursorPenJoin As Long=91
  • cdrCursorPickOvertarget As Long=107
  • cdrCursorTrimSingle As Long=139
  • cdrCursorWeldSingle As Long=141
  • cdrCursorIntersectSingle As Long=143

Enum cdrDataFormatType

Constants:

  • cdrFormatGeneral As Long=0
  • cdrFormatDataTime As Long=1
  • cdrFormatLinearAngular As Long=2
  • cdrFormatNumeric As Long=3

Enum cdrDistortionType

Constants:

  • cdrDistortionPushPull As Long=0
  • cdrDistortionZipper As Long=1
  • cdrDistortionTwister As Long=2

Enum cdrDitherType

Constants:

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

Enum cdrDropShadowType

Constants:

  • cdrDropShadowFlat As Long=0
  • cdrDropShadowBottom As Long=1
  • cdrDropShadowTop As Long=2
  • cdrDropShadowLeft As Long=3
  • cdrDropShadowRight As Long=4

Enum cdrEdgeType

Constants:

  • cdrEdgeLinear As Long=0
  • cdrEdgeSquared As Long=1
  • cdrEdgeFlat As Long=2
  • cdrEdgeInverseSquared As Long=3
  • cdrEdgeMesa As Long=4
  • cdrEdgeGaussian As Long=5

Enum cdrEffectType

Constants:

  • cdrBlend As Long=0
  • cdrExtrude As Long=1
  • cdrEnvelope As Long=2
  • cdrTextOnPath As Long=3
  • cdrControlPath As Long=4
  • cdrDropShadow As Long=5
  • cdrContour As Long=6
  • cdrDistortion As Long=7
  • cdrPerspective As Long=8
  • cdrLens As Long=9

Enum cdrEnvelopeMode

Constants:

  • cdrEnvelopeHorizontal As Long=0
  • cdrEnvelopeOriginal As Long=1
  • cdrEnvelopePutty As Long=2
  • cdrEnvelopeVertical As Long=3

Enum cdrExtrudeLightPosition

Constants:

  • cdrLightFrontTopLeft As Long=0
  • cdrLightFrontTop As Long=1
  • cdrLightFrontTopRight As Long=2
  • cdrLightFrontLeft As Long=3
  • cdrLightFrontCenter As Long=4
  • cdrLightFrontRight As Long=5
  • cdrLightFrontBottomLeft As Long=6
  • cdrLightFrontBottom As Long=7
  • cdrLightFrontBottomRight As Long=8
  • cdrLightBackTopLeft As Long=9
  • cdrLightBackTop As Long=10
  • cdrLightBackTopRight As Long=11
  • cdrLightBackRight As Long=14
  • cdrLightBackBottomRight As Long=17

Enum cdrExtrudeShading

Constants:

  • cdrExtrudeObjectFill As Long=0
  • cdrExtrudeSolidFill As Long=1
  • cdrExtrudeColorShading As Long=2

Enum cdrExtrudeType

Constants:

  • cdrExtrudeSmallBack As Long=0
  • cdrExtrudeSmallFront As Long=1
  • cdrExtrudeBigBack As Long=2
  • cdrExtrudeBigFront As Long=3
  • cdrExtrudeBackParallel As Long=4
  • cdrExtrudeFrontParallel As Long=5

Enum cdrExtrudeVPType

Constants:

  • cdrVPLockedToShape As Long=0
  • cdrVPLockedToPage As Long=1
  • cdrVPShared As Long=2

Enum cdrFeatherType

Constants:

  • cdrFeatherInside As Long=0
  • cdrFeatherMiddle As Long=1
  • cdrFeatherOutside As Long=2
  • cdrFeatherAverage As Long=3

Enum cdrFileVersion

Constants:

  • cdrVersion10 As Long=10

Enum cdrFillType

Constants:

  • cdrPatternFill As Long=9

Enum cdrFilter

Constants:

  • cdrPAT As Long=1801
  • 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
  • cdtPAT As Long=1801

Enum cdrFlipAxes

Constants:

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

Enum cdrFontCase

Constants:

  • cdrMixedFontCase As Long=3

Enum cdrFontLine

Constants:

  • cdrMixedFontLine As Long=7

Enum cdrFontPosition

Constants:

  • cdrMixedFontPosition As Long=3

Enum cdrFontStyle

Constants:

  • cdrThinFontStyle As Long=4
  • cdrThinItalicFontStyle As Long=5
  • cdrExtraLightFontStyle As Long=6
  • cdrExtraLightItalicFontStyle As Long=7
  • cdrMediumFontStyle As Long=8
  • cdrMediumItalicFontStyle As Long=9
  • cdrSemiBoldFontStyle As Long=10
  • cdrSemiBoldItalicFontStyle As Long=11
  • cdrExtraBoldFontStyle As Long=12
  • cdrExtraBoldItalicFontStyle As Long=13
  • cdrHeavyFontStyle As Long=14
  • cdrHeavyItalicFontStyle As Long=15
  • cdrMixedFontStyle As Long=16

Enum cdrGridType

Constants:

  • cdrGridDot As Long=0
  • cdrGridLine As Long=1

Enum cdrGuideType

Constants:

  • cdrAllGuides As Long=-1
  • cdrHorizontalGuide As Long=0
  • cdrVerticalGuide As Long=1
  • cdrSlantedGuide As Long=2

Enum cdrImagePaletteType

Constants:

  • 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 cdrImageType

Constants:

  • cdrDuotoneImage As Long=6

Enum cdrLensType

Constants:

  • cdrLensMagnify As Long=0
  • cdrLensFishEye As Long=1
  • cdrLensWireframe As Long=2
  • cdrLensColorLimit As Long=3
  • cdrLensColorAdd As Long=4
  • cdrLensInvert As Long=5
  • cdrLensBrighten As Long=6
  • cdrLensTintedGrayscale As Long=7
  • cdrLensHeatMap As Long=8
  • cdrLensTransparency As Long=9
  • cdrLensCustomColorMap As Long=10

Enum cdrLineSpacingType

Constants:

  • cdrMixedLineSpacing As Long=3

Enum cdrNodeType

Constants:

  • cdrCuspNode As Long=0
  • cdrSmoothNode As Long=1
  • cdrSymmetricalNode As Long=2
  • cdrMixedNodes As Long=3

Enum cdrOutlineLineCaps

Constants:

  • cdrOutlineButtLineCaps As Long=0
  • cdrOutlineRoundLineCaps As Long=1
  • cdrOutlineSquareLineCaps As Long=2

Enum cdrOutlineLineJoin

Constants:

  • cdrOutlineMiterLineJoin As Long=0
  • cdrOutlineRoundLineJoin As Long=1
  • cdrOutlineBevelLineJoin As Long=2

Enum cdrPageBackground

Constants:

  • cdrPageBackgroundNone As Long=0
  • cdrPageBackgroundSolid As Long=1
  • cdrPageBackgroundBitmap As Long=2

Enum cdrPaletteID

Constants:

  • cdrPANTONEMetallic As Long=2019
  • cdrCustom As Long=0

Enum cdrPanoseMatchingType

Constants:

  • cdrPanosePrompt As Long=0
  • cdrPanoseTemporary As Long=1
  • cdrPanosePermanent As Long=2

Enum cdrPatternCanvasSize

Constants:

  • cdrPatternCanvas16x16 As Long=0
  • cdrPatternCanvas32x32 As Long=1
  • cdrPatternCanvas64x64 As Long=2
  • cdrPatternCanvasCustom As Long=3

Enum cdrPatternFillType

Constants:

  • cdrTwoColorPattern As Long=0
  • cdrFullColorPattern As Long=1
  • cdrBitmapPattern As Long=2

Enum cdrPointType

Constants:

  • cdrShapePoint As Long=0
  • cdrFreePoint As Long=1

Enum cdrPositionOfPointOverShape

Constants:

  • cdrOutsideShape As Long=0
  • cdrOnMarginOfShape As Long=1
  • cdrInsideShape As Long=2

Enum cdrPresetPoint

Constants:

  • cdrTopLeftPoint As Long=-1
  • cdrTopPoint As Long=-2
  • cdrTopRightPoint As Long=-3
  • cdrRightPoint As Long=-4
  • cdrBottomRightPoint As Long=-5
  • cdrBottomPoint As Long=-6
  • cdrBottomLeftPoint As Long=-7
  • cdrLeftPoint As Long=-8
  • cdrCenterPoint As Long=-9
  • cdrFirstPoint As Long=-10
  • cdrLastPoint As Long=-11

Enum cdrSegmentOffsetType

Constants:

  • cdrAbsoluteSegmentOffset As Long=0
  • cdrRelativeSegmentOffset As Long=1
  • cdrParamSegmentOffset As Long=2

Enum cdrSegmentType

Constants:

  • cdrLineSegment As Long=0
  • cdrCurveSegment As Long=1
  • cdrMixedSegments As Long=2

Enum cdrShapeEnumDirection

Constants:

  • cdrShapeEnumTopFirst As Long=0
  • cdrShapeEnumBottomFirst As Long=1

Enum cdrShapeLevel

Constants:

  • cdrLevelGroup As Long=0
  • cdrLevelContainer As Long=1
  • cdrLevelLayer As Long=2
  • cdrLevelPage As Long=3
  • cdrLevelDocument As Long=4

Enum cdrShapeType

Constants:

  • cdrBlendGroupShape As Long=10
  • cdrExtrudeGroupShape As Long=11
  • cdrOLEObjectShape As Long=12
  • cdrContourGroupShape As Long=13
  • cdrLinearDimensionShape As Long=14
  • cdrBevelGroupShape As Long=15
  • cdrDropShadowGroupShape As Long=16
  • cdr3DObjectShape As Long=17
  • cdrArtisticMediaGroupShape As Long=18
  • cdrConnectorShape As Long=19
  • cdrMeshFillShape As Long=20

Enum cdrTexturePropertyType

Constants:

  • cdrTexturePropertyNumeric As Long=0
  • cdrTexturePropertyColorRGB As Long=1
  • cdrTexturePropertyColorHSB As Long=2
  • cdrTexturePropertyColorCMYK As Long=3

Enum cdrTileOffsetType

Constants:

  • cdrTileOffsetRow As Long=0
  • cdrTileOffsetColumn As Long=1

Enum cdrTools

Constants:

  • cdrToolNone As Long=0
  • cdrToolPick As Long=1
  • cdrToolNodeEdit As Long=2
  • cdrToolKnife As Long=64
  • cdrToolBezierKnife As Long=81
  • cdrToolEraser As Long=68
  • cdrToolDrawRectangle As Long=3
  • cdrToolDrawEllipse As Long=4
  • cdrToolDrawText As Long=7
  • cdrToolDrawFreehand As Long=5
  • cdrToolDrawNaturalPen As Long=103
  • cdrToolDrawBezier As Long=6
  • cdrToolHorizontalDimension As Long=54
  • cdrToolVerticalDimension As Long=55
  • cdrToolAutoDimension As Long=110
  • cdrToolSlantedDimension As Long=56
  • cdrToolLeaderText As Long=57
  • cdrToolAngledDimension As Long=58
  • cdrToolConnectorLines As Long=59
  • cdrToolDrawPolygon As Long=60
  • cdrToolDrawSpiral As Long=62
  • cdrToolDrawGrid As Long=63
  • cdrToolZoom As Long=66
  • cdrToolPan As Long=67
  • cdrToolFill As Long=71
  • cdrToolTransparency As Long=72
  • cdrToolInteractiveExtrude As Long=73
  • cdrToolBlend As Long=74
  • cdrToolRotate As Long=75
  • cdrToolReflect As Long=76
  • cdrToolScale As Long=77
  • cdrToolSkew As Long=78
  • cdrToolDistortion As Long=79
  • cdrToolContour As Long=113
  • cdrToolInsertHTMLFormObject As Long=111
  • cdrToolDropShadow As Long=80
  • cdrToolDrawConnector As Long=115
  • cdrToolEyeDropper As Long=119

Enum cdrTransparencyAppliedTo

Constants:

  • cdrApplyToFill As Long=0
  • cdrApplyToOutline As Long=1
  • cdrApplyToFillAndOutline As Long=2

Enum cdrTransparencyType

Constants:

  • cdrNoTransparency As Long=0
  • cdrUniformTransparency As Long=1
  • cdrFountainTransparency As Long=2
  • cdrPatternTransparency As Long=3
  • cdrTextureTransparency As Long=4

Enum cdrUnit

Constants:

  • cdrPoint As Long=14
  • cdrUnitQ As Long=15
  • cdrUnitH As Long=16

Enum cdrURLRegion

Constants:

  • cdrURLRegionDefault As Long=0
  • cdrURLRegionRectangle As Long=1
  • cdrURLRegionShape As Long=2

Enum cdrWindowArrangeStyle

Constants:

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

Enum cdrWindowState

Constants:

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

Enum cuiBarPosition

Constants:

  • cuiBarLeft As Long=0
  • cuiBarTop As Long=1
  • cuiBarRight As Long=2
  • cuiBarBottom As Long=3
  • cuiBarFloating As Long=4

Enum cuiBarProtection

Constants:

  • cuiBarNoProtection As Long=0
  • cuiBarNoCustomize As Long=1
  • cuiBarNoMove As Long=4
  • cuiBarNoChangeVisible As Long=8
  • cuiBarNoChangeDock As Long=16
  • cuiBarNoVerticalDock As Long=32
  • cuiBarNoHorizontalDock As Long=64

Enum cuiBarType

Constants:

  • cuiBarTypeNormal As Long=0
  • cuiBarTypeMenuBar As Long=1
  • cuiBarTypePopup As Long=2
  • cuiBarTypeStatusBar As Long=3
  • cuiBarTypePropertyBar As Long=4

Enum pdfBitmapCompressionType

Constants:

  • pdfNone As Long=0
  • pdfLZW As Long=1
  • pdfJPEG As Long=2
  • pdfZIP As Long=3

Enum pdfColorMode

Constants:

  • pdfRGB As Long=0
  • pdfCMYK As Long=1
  • pdfGrayscale As Long=2
  • pdfNative As Long=3

Enum pdfColorProfile

Constants:

  • pdfCompositeProfile As Long=0
  • pdfSeparationProfile As Long=1

Enum pdfDisplayOnStart

Constants:

  • pdfPageOnly As Long=0
  • pdfFullScreen As Long=1
  • PDFBookmarks As Long=2
  • pdfThumbnails As Long=3

Enum pdfEncodingType

Constants:

  • pdfASCII85 As Long=0
  • pdfBinary As Long=1

Enum pdfEPSAs

Constants:

  • pdfPostscript As Long=0
  • pdfPreview As Long=1

Enum pdfExportRange

Constants:

  • pdfWholeDocument As Long=0
  • pdfCurrentPage As Long=1
  • pdfSelection As Long=2
  • pdfPageRange As Long=3

Enum pdfVersion

Constants:

  • pdfVersion12 As Long=0
  • pdfVersion13 As Long=1
  • pdfVersionPDFX1 As Long=2

Enum PrnBitmapColorMode

Constants:

  • prnBitmapCMYK As Long=0
  • prnBitmapRGB As Long=1
  • prnBitmapGrayscale As Long=2

Enum PrnColorMode

Constants:

  • prnModeFullColor As Long=0
  • prnModeGrayscale As Long=1
  • prnModeBlack As Long=2

Enum PrnFileMode

Constants:

  • prnSingleFile As Long=0
  • prnSeparatePages As Long=1
  • prnSeparatePlates As Long=2

Enum PrnImageTrap

Constants:

  • prnTrapNormal As Long=0
  • prnTrapSpread As Long=1
  • prnTrapChoke As Long=2
  • prnTrapCenter As Long=3

Enum PrnPDFStartup

Constants:

  • prnPDFFullScreen As Long=0
  • prnPDFPageOnly As Long=1
  • prnPDFThumbnails As Long=2
  • prnPDFOutlines As Long=3

Enum PrnPlateType

Constants:

  • prnCyan As Long=0
  • prnMagenta As Long=1
  • prnYellow As Long=2
  • prnBlack As Long=3
  • prnOrange As Long=4
  • prnGreen As Long=5
  • prnSpot As Long=6

Enum PrnPostScriptLevel

Constants:

  • prnPSLevel1 As Long=1
  • prnPSLevel2 As Long=2
  • prnPSLevel3 As Long=3

Enum PrnPrintRange

Constants:

  • prnWholeDocument As Long=0
  • prnCurrentPage As Long=1
  • prnSelection As Long=2
  • prnPageRange As Long=3

Enum PrnRegistrationStyle

Constants:

  • prnStandard As Long=0
  • prnLong As Long=1
  • prnSquare As Long=2
  • prnHalfInverted As Long=3
  • prnCorel As Long=4

Enum PrnTrapType

Constants:

  • prnLayerNormal As Long=0
  • prnLayerTransparent As Long=1
  • prnLayerOpaque As Long=2
  • prnLayerOpaqueIgnore As Long=3

[ CorelDRAW 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/27/00.