CorelDRAW 9 VBA Object Model

This file was automatically generated by Tlb2Html utility
Type library name: CorelDRAW
Description: Corel - CorelDRAW 9.0 Type Library
Version: 9.0
Tlb2Html utility © Copyright 2000 by Alex Vakulenko

Index

Class Application

Properties:

  • Property ActiveDocument As Document [r/o]
  • Property ActivePage As Page [r/o]
  • Property ActivePalette As Palette [r/o]
  • Property ActiveWindow As Window [r/o]
  • Property ActiveWorkspace As Workspace [r/o]
  • Property Application As Application [r/o]
  • Property Documents As Documents [r/o]
  • Property FontList As FontList [r/o]
  • Property Palettes As Palettes [r/o]
  • Property Parent As Application [r/o]
  • Property Visible As Boolean [r/w]
  • Property Windows As Windows [r/o]
  • Property Workspaces As Workspaces [r/o]

Methods:

Class Bitmap

Properties:

  • Property ExternallyLinked As Boolean [r/o]
  • Property ResolutionX As Long [r/o]
  • Property ResolutionY As Long [r/o]
  • Property SizeHeight As Long [r/o]
  • Property SizeWidth As Long [r/o]

Methods:

  • Sub Inflate(ByVal Width As Long, ByVal Height As Long)
  • Sub ResolveLink()
  • Sub UpdateLink()

Class Color

Properties:

  • Property Application As Application [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 Name([ByVal Components As Boolean = False]) As String [r/o]
  • Property PantoneDensity As Long [r/w]
  • Property PantoneID 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 Type As cdrColorType [r/o]

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 ConvertToGray()
  • Sub ConvertToHLS()
  • Sub ConvertToHSB()
  • Sub ConvertToPantone()
  • Sub ConvertToRGB()
  • 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 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 PantoneAssign(ByVal PantoneID As Long, ByVal Density As Long)
  • Sub RGBAssign(ByVal Red As Long, ByVal Green As Long, ByVal Blue As Long)
  • Sub UserAssign()

Class Colors

Properties:

  • Property Application As Application [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 CorelScript

Methods:

  • Function AddArrowPoint(ByVal X As Long, ByVal Y As Long, ByVal Enabled As Boolean, ByVal Letter As Boolean, ByVal User As Boolean, ByVal Closed As Boolean, ByVal Continuity As Long, ByVal NodeType As Long) As Long
  • Function AddBezierPoint(ByVal X As Long, ByVal Y As Long, ByVal Constrain As Boolean, ByVal Cusp As Boolean) As Long
  • Function AddEnvelopeEffect(ByVal PresetNumber As Long, ByVal MappingMode As Long, ByVal KeepLines As Boolean) As Long
  • Function AddFreehandPoint(ByVal ConvertToDPCoords As Boolean, ByVal X As Long, ByVal Y As Long) As Long
  • Function AddNode(ByVal X As Long, ByVal Y As Long) As Long
  • Function AddObjectDataField(ByVal FieldName As String) As Long
  • Function AddPageFrame() As Long
  • Function AddTabStop(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal TabStop As Long) As Long
  • Function AfterObject(ByVal CorelDRAWID As Long) As Long
  • Function AlignObjects(ByVal HorizontalAlignment As Long, ByVal VerticalAlignment As Long) As Long
  • Function AlignTextToBaseline(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long) As Long
  • Function AlignToCenterOfPage(ByVal HorizontalAlignment As Long, ByVal VerticalAlignment As Long) As Long
  • Function AlignToGrid(ByVal HorizontalAlignment As Long, ByVal VerticalAlignment As Long) As Long
  • Function AppendCurveLine(ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
  • Function AppendObjectToSelection(ByVal ObjectID As Long) As Boolean
  • Function ApplyBitmapEffect(ByVal EffectID 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) As Long
  • Function ApplyContour(ByVal ContourType As Long, ByVal Offset As Long, ByVal Steps As Long, ByVal ColorWheelDirection As Long) As Long
  • Function ApplyDistortion(ByVal New As Boolean, ByVal DistortionType As Long, ByVal Amplitude As Long, ByVal Frequency As Long, ByVal Seed As Long, ByVal Angle As Long, ByVal CenterX As Long, ByVal CenterY As Long, ByVal Flag As Long) As Long
  • Function ApplyDropShadow(ByVal HorizOffset As Long, ByVal VertOffset As Long, ByVal Opacity As Long, ByVal Feather As Long, ByVal FeatherType As Long, ByVal FeatherEdge As Long, ByVal PerspectiveType As Long, ByVal PerspectiveSkewAngle As Long, ByVal PerspectiveStretch As Double, ByVal Fade As Long, ByVal IdenticalValues As Boolean) As Long
  • Function ApplyEnvelopeFrom(ByVal ObjectID As Long, ByVal MappingMode As Long, ByVal KeepLines As Boolean) As Long
  • Function ApplyExtrude(ByVal ExtrudeType As Long, ByVal VPProperties As Long, ByVal CopyObjectID As Long, ByVal Depth As Long, ByVal VPHorizPos As Long, ByVal VPVertPos As Long, ByVal PageOrigin As Boolean, ByVal Light1Pos As Long, ByVal Light1Intensity As Long, ByVal Light2Pos As Long, ByVal Light2Intensity As Long, ByVal Light3Pos As Long, ByVal Light3Intensity As Long, ByVal FillType As Long, ByVal DrapeFill As Boolean) As Long
  • Function ApplyFountainBitmapLens(ByVal Type As Long, ByVal CenterX As Long, ByVal CenterY As Long, ByVal Angle As Long, ByVal Steps As Long, ByVal Padding As Long, ByVal Blend As Long, ByVal Rate As Long, ByVal Starting As Long, ByVal Operation As Long, ByVal Freeze As Boolean) As Long
  • Function ApplyFountainFill(ByVal Type As Long, ByVal CenterX As Long, ByVal CenterY As Long, ByVal Angle As Long, ByVal Steps As Long, ByVal Padding As Long, ByVal Blend As Long, ByVal Rate As Long) As Long
  • Function ApplyFullColorFill(ByVal FileName As String, ByVal TileWidth As Long, ByVal TileHeight As Long, ByVal FirstTileOffsetX As Long, ByVal FirstTileOffsetY As Long, ByVal RowOffset As Boolean, ByVal RowColumnOffset As Long, ByVal SeamlessTiling As Boolean, ByVal ScaleWithObject As Boolean, ByVal VectorBBoxTop As Long, ByVal VectorBBoxBottom As Long, ByVal VectorBBoxLeft As Long, ByVal VectorBBoxRight As Long, ByVal RotationAngle As Long, ByVal SkewAngle As Long) As Long
  • Function ApplyLensEffect(ByVal LensType As Long, ByVal Frozen As Boolean, ByVal RemoveFace As Boolean, ByVal ViewPoint As Boolean, ByVal VPX As Long, ByVal VPY As Long, ByVal Param1 As Long) As Long
  • Function ApplyNoFill() As Long
  • Function ApplyOutline(ByVal Width As Long, ByVal Type As Long, ByVal EndCaps As Long, ByVal JoinType As Long, ByVal Aspect As Long, ByVal Angle As Long, ByVal DotDash As Long, ByVal RightArrow As Long, ByVal LeftArrow As Long, ByVal BehindFill As Boolean, ByVal OutlineType As Long, ByVal Preset As Long, ByVal ScalePen As Boolean) As Long
  • Function ApplyPerspectiveEffect(ByVal Handle As Long, ByVal PosX As Long, ByVal PosY As Long) As Long
  • Function ApplyPostscriptFill(ByVal PSFill As String, ByVal NumParms As Long, ByVal Parm1 As Long, ByVal Parm2 As Long, ByVal Parm3 As Long, ByVal Parm4 As Long, ByVal Parm5 As Long) As Long
  • Function ApplyPreset(ByVal PresetFileName As String, ByVal PresetName As String) As Long
  • Function ApplyPresetEnvelope(ByVal PresetNumber As Long, ByVal MappingMode As Long, ByVal KeepLines As Boolean) As Long
  • Function ApplyRotatedExtrude(ByVal ExtrudeType As Long, ByVal Depth As Long, ByVal XRotation As Long, ByVal YRotation As Long, ByVal ZRotation As Long, ByVal VPHorizPos As Long, ByVal VPVertPos As Long, ByVal PageOrigin As Boolean, ByVal Light1Pos As Long, ByVal Light1Intensity As Long, ByVal Light2Pos As Long, ByVal Light2Intensity As Long, ByVal Light3Pos As Long, ByVal Light3Intensity As Long, ByVal FillType As Long, ByVal DrapeFill As Boolean) As Long
  • Function ApplyStyle(ByVal Style As String) As Long
  • Function ApplyTextureBitmapLens(ByVal TextureLibrary As String, ByVal TextureName As String, ByVal TextureStyle As String, ByVal TextureWidth As Long, ByVal TextureHeight As Long, ByVal TextureOffsetX As Long, ByVal TextureOffsetY As Long, ByVal RowOffset As Boolean, ByVal RowColumnOffset As Long, ByVal ScaleWithObject As Boolean, ByVal RotationAngle As Long, ByVal SkewAngle As Long, ByVal Starting As Long, ByVal Ending As Long, ByVal Operation As Long, ByVal Freeze As Boolean) As Long
  • Function ApplyTextureFill(ByVal TextureLibrary As String, ByVal TextureName As String, ByVal TextureStyle As String, ByVal TextureWidth As Long, ByVal TextureHeight As Long, ByVal TextureOffestX As Long, ByVal TextureOffsetY As Long, ByVal RowOffset As Boolean, ByVal RowColumnOffset As Long, ByVal ScaleWithObject As Boolean, ByVal RotationAngle As Long, ByVal SkewAngle As Long) As Long
  • Function ApplyTwoColorBitmapLens(ByVal FileName As String, ByVal TileWidth As Long, ByVal TileHeight As Long, ByVal FirstTileOffsetX As Long, ByVal FirstTileOffsetY As Long, ByVal RowOffset As Boolean, ByVal RowColumnOffset As Long, ByVal SeamlessTiling As Boolean, ByVal ScaleWithObject As Boolean, ByVal RotationAngle As Long, ByVal SkewAngle As Long, ByVal Starting As Long, ByVal Ending As Long, ByVal Operation As Long, ByVal Freeze As Boolean) As Long
  • Function ApplyTwoColorFill(ByVal FileName As String, ByVal TileWidth As Long, ByVal TileHeight As Long, ByVal FirstTileOffsetX As Long, ByVal FirstTileOffsetY As Long, ByVal RowOffset As Boolean, ByVal RowColumnOffset As Long, ByVal SeamlessTiling As Boolean, ByVal ScaleWithObject As Boolean, ByVal RotationAngle As Long, ByVal SkewAngle As Long) As Long
  • Function ApplyUniformBitmapLens(ByVal Starting As Long, ByVal Operation As Long, ByVal Freeze As Boolean) As Long
  • Function ApplyUniformFillColor() As Long
  • Function BeforeObject(ByVal CorelDRAWID As Long) As Long
  • Function BeginCommandGroup(ByVal UndoString As String) As Long
  • Function BeginDrawArrow(ByVal LeftArrow As Boolean, ByVal LineOffset As Long, ByVal NumOfPoints As Long) As Long
  • Function BeginDrawBezier(ByVal X As Long, ByVal Y As Long, ByVal Cusp As Boolean) As Long
  • Function BeginDrawCurve(ByVal X As Long, ByVal Y As Long) As Long
  • Function BeginDrawFreehand(ByVal ConvertToDPCoords As Boolean, ByVal X As Long, ByVal Y As Long) As Long
  • Function BeginEditObject() As Long
  • Function Benchmark(ByVal Enable As Boolean) As Long
  • Function BreakApart() As Long
  • Function ChangeLayerColor(ByVal LayerName As String, ByVal PageNum As Long) As Long
  • Function ChangeLayerName(ByVal NewLayerName As String) As Long
  • Function ClearAllObjectData() As Long
  • Function ClearEffect(ByVal LeaveTarget As Boolean) As Long
  • Function ClearNodeSelection() As Long
  • Function ClearObjectData(ByVal FieldName As String) As Long
  • Function ClickedDialogButton(ByVal DialogID As Long, ByVal ButtonID As Long) As Long
  • Function CloneObject(ByVal XOffset As Long, ByVal YOffset As Long) As Long
  • Function CloseCurve() As Long
  • Function Combine() As Long
  • Function ConvertBitmapTo(ByVal EffectID As Long) As Long
  • Function ConvertColor(ByVal ToColorModel As Long, ByRef ToV1 As Long, ByRef ToV2 As Long, ByRef ToV3 As Long, ByRef ToV4 As Long, ByRef ToV5 As Long, ByRef ToV6 As Long, ByRef ToDensity As Long) As Long
  • Function ConvertOutlineToObject() As Long
  • Function ConvertToBitmap(ByVal BitDepth As Long, ByVal Grayscale As Boolean, ByVal Dithered As Boolean, ByVal TransparentBG As Boolean, ByVal Resolution As Long, ByVal AntiAliasing As Long, ByVal UseColorProfile As Boolean) As Long
  • Function ConvertToCurves() As Long
  • Function CopyEffectFrom(ByVal Clone As Boolean, ByVal SourceObjectID As Long) As Long
  • Function CopyObjectDataFields(ByVal Index As Long) As Long
  • Function CopyPowerClip(ByVal Index As Long, ByVal XDisp As Long, ByVal YDisp As Long) As Long
  • Function CopyPropertiesFrom(ByVal FromObjectID As Long, ByVal OutlinePen As Boolean, ByVal OutlineColor As Boolean, ByVal Fill As Boolean, ByVal TextAttributes As Boolean) As Long
  • Function CopyToClipboard() As Long
  • Function CopyToLayer(ByVal LayerName As String) As Long
  • Function CreateAngleDimension(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 LargeAngle As Boolean, ByVal WitnessExtension As Long, ByVal WitnessGap As Long, ByVal LabelGap As Long) As Long
  • Function CreateArtisticText(ByVal NewText As String, ByVal Left As Long, ByVal Top As Long) As Long
  • Function CreateCallout(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 Text As String) As Long
  • Function CreateConnector(ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal Placement As Boolean) As Long
  • Function CreateDimension(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 Style As Long, ByVal WitnessExtension As Long, ByVal WitnessGap As Long, ByVal LabelGap As Long) As Long
  • Function CreateEllipse(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal StartAngle As Long, ByVal EndAngle As Long, ByVal Arc As Boolean) As Long
  • Function CreateGridBoxes(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal Wide As Long, ByVal High As Long) As Long
  • Function CreateGuidelineUsingAngle(ByVal IntersectPointX As Long, ByVal IntersectPointY As Long, ByVal Angle As Long, ByVal Locked As Boolean) As Long
  • Function CreateGuidelineUsingTwoPoints(ByVal Point1X As Long, ByVal Point1Y As Long, ByVal Point2X As Long, ByVal Point2Y As Long, ByVal Locked As Boolean) As Long
  • Function CreateNewStyle(ByVal StyleType As Long, ByVal StyleName As String) As Long
  • Function CreateObjectDataField(ByVal FieldName As String, ByVal Format As String, ByVal Order As Long, ByVal ColumnWidth As Long, ByVal DrawDefault As Boolean, ByVal DocDefault As Boolean, ByVal SummarizeGroup As Boolean) As Long
  • Function CreatePaletteFromDocument(ByVal FileName As String, ByVal Overwrite As Boolean) As Long
  • Function CreatePaletteFromSelection(ByVal FileName As String, ByVal Overwrite As Boolean) As Long
  • Function CreateRectangle(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal CornerRadius As Long, ByVal CornerRadius2 As Long, ByVal CornerRadius3 As Long, ByVal CornerRadius4 As Long) As Long
  • Function CreateSpiral(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal NumRevolutions As Long, ByVal SpiralType As Long, ByVal GrowthRate As Long) As Long
  • Function CreateSymPolygon(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal Sides As Long, ByVal Subpaths As Long, ByVal Complexity As Long, ByVal Star As Boolean, ByVal StarComplexity As Long, ByVal MaxComplexity As Long) As Long
  • Function CreateTextString(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal Text As String) As Long
  • Function CutToClipboard() As Long
  • Function DefineObjectDataField(ByVal FieldName As String, ByVal Format As String, ByVal DrawDefault As Boolean, ByVal DocDefault As Boolean, ByVal SummarizeGroup As Boolean) As Long
  • Function DeleteGuidelineByIndex(ByVal Index As Long) As Long
  • Function DeleteGuidelineUsingAngle(ByVal IntersectX As Long, ByVal IntersectY As Long, ByVal Angle As Long) As Boolean
  • Function DeleteGuidelineUsingTwoPoints(ByVal Point1X As Long, ByVal Point1Y As Long, ByVal Point2X As Long, ByVal Point2Y As Long) As Boolean
  • Function DeleteLayer(ByVal LayerName As String) As Long
  • Function DeleteNode() As Long
  • Function DeleteObject() As Long
  • Function DeleteObjectDataField(ByVal FieldName As String) As Long
  • Function DeletePages(ByVal UnusedParameter As Boolean, ByVal NumberOfPages As Long, ByVal StartPageNumber As Long) As Long
  • Function DeletePaletteColor(ByVal Index As Long) As Long
  • Function DeleteStyle(ByVal Style As String) As Long
  • Function DetachBlendPath() As Long
  • Function DisplayFacingPages(ByVal FacingPages As Boolean, ByVal LeftFirst As Boolean) As Long
  • Function DistributeObjects(ByVal HorizontalDistribution As Long, ByVal VerticalDistribution As Long, ByVal ObjectOrPageExtents As Long) As Long
  • Function DrawCurveClosePath() As Long
  • Function DrawCurveCurveTo(ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal XEnd As Long, ByVal YEnd As Long) As Long
  • Function DrawCurveLineTo(ByVal X As Long, ByVal Y As Long) As Long
  • Function DrawCurveMoveTo(ByVal X As Long, ByVal Y As Long) As Long
  • Function DropSymbol(ByVal SymbolLibrary As String, ByVal SymbolNumber As Long, ByVal Tile As Boolean, ByVal XPosOrGridSize As Long, ByVal YPosOrGridSize As Long, ByVal ProportionalSizing As Boolean, ByVal SymbolSize As Long) As Long
  • Function DuplicateObject(ByVal XOffset As Long, ByVal YOffset As Long) As Long
  • Function EditAngleDimensionLabel(ByVal Dynamic As Boolean, ByVal Precision As Integer, ByVal Units As Integer, ByVal ShowUnits As Boolean, ByVal Prefix As String, ByVal Suffix As String) As Long
  • Function EditDimensionLabel(ByVal Placement As Integer, ByVal Horizontal As Boolean, ByVal Center As Boolean, ByVal Dynamic As Boolean, ByVal Style As Integer, ByVal Precision As Integer, ByVal Units As Integer, ByVal ShowUnits As Boolean, ByVal Prefix As String, ByVal Suffix As String) As Long
  • Function EditLayer(ByVal LayerName As String, ByVal PageNum As Long, ByVal NewName As String, ByVal Visible As Boolean, ByVal Printable As Boolean, ByVal Locked As Boolean, ByVal Master As Boolean, ByVal WireOverride As Boolean, ByVal ChangeColor As Boolean) As Long
  • Function EditObjectCommand(ByVal Cmd As Long, ByVal X As Long, ByVal Y As Long, ByVal Key As Long, ByVal AddToSelection As Boolean) As Long
  • Function EndCommandGroup() As Long
  • Function EndDrawArrow() As Long
  • Function EndDrawBezier() As Long
  • Function EndDrawCurve() As Long
  • Function EndDrawFreehand(ByVal StraightTightness As Long, ByVal CurveTightness As Long, ByVal CornerThreshold As Long, ByVal SnapTightness As Long) As Long
  • Function EndEditObject() As Long
  • Function EndOfRecording() As Long
  • Function ExtractContents() As Long
  • Function ExtractText(ByVal DestinationFile As String) As Boolean
  • Function FileClose(ByVal PromptUser As Boolean) As Boolean
  • Function FileExit(ByVal PromptUser As Boolean) As Boolean
  • Function FileExport(ByVal FileName As String, ByVal FilterId As Long, ByVal Width As Long, ByVal Height As Long, ByVal XResolution As Long, ByVal YResolution As Long, ByVal ImageType As Long, ByVal AntiAliasing As Long, ByVal Overwrite As Boolean, ByVal SelectionOnly As Boolean) As Long
  • Function FileImport(ByVal FileName As String, ByVal FilterId As Long, ByVal MaintainLayersAndPages As Boolean) As Long
  • Function FileNew() As Long
  • Function FileOpen(ByVal FileName As String) As Long
  • Function FilePrint() As Long
  • Function FileSave(ByVal FileName As String, ByVal ThumbnailSize As Long, ByVal SaveSelectedOnly As Boolean, ByVal FileVersion As Long, ByVal IncludeCMXData As Boolean) As Long
  • Function FindNextObjectOfStyle() As Boolean
  • Function FindObjectOfStyle(ByVal StyleName As String) As Boolean
  • Function FitTextToPath(ByVal TextOrientation As Long, ByVal VertAlign As Long, ByVal HorizAlign As Long, ByVal CurveSideToFit As Long, ByVal FitOtherSide As Boolean, ByVal HorizOffset As Long, ByVal DistFromPath As Long) As Long
  • Function FuseBlend(ByVal End As Boolean, ByVal PositionX As Long, ByVal PositionY As Long) As Long
  • Function GetBitmapResolution(ByRef XRes As Long, ByRef YRes As Long) As Long
  • Function GetBitmapSize(ByRef Width As Long, ByRef Height As Long) As Long
  • Function GetCDRFileCompRatio(ByVal FileName As String) As Long
  • Function GetCDRFileKeywords(ByVal FileName As String) As String
  • Function GetCDRFileLastSavedBy(ByVal FileName As String) As String
  • Function GetCDRFileNotes(ByVal FileName As String) As String
  • Function GetCDRFileThumbnail(ByVal CDRFileName As String, ByVal BMPFileName As String) As Long
  • Function GetCDRFileVersion(ByVal FileName As String) As Long
  • Function GetColor(ByVal StoreColor As Boolean, ByRef ColorModel As Long, ByRef V1 As Long, ByRef V2 As Long, ByRef V3 As Long, ByRef V4 As Long, ByRef V5 As Long, ByRef V6 As Long, ByRef V7 As Long) As Long
  • Function GetCurrentPageName() As String
  • Function GetCurrentPageOrientation() As Long
  • Function GetCurrentPageSize(ByRef Width As Long, ByRef Height As Long) As Long
  • Function GetCurrentPaletteName() As String
  • Function GetCurrentWorkspaceName() As String
  • Function GetCurveClose() As Long
  • Function GetCurveFirstNodePosition(ByRef X As Long, ByRef Y As Long) As Long
  • Function GetCurveIthNodePosition(ByVal Index As Long, ByRef X As Long, ByRef Y As Long) As Long
  • Function GetCurveLastNodePosition(ByRef X As Long, ByRef Y As Long) As Long
  • Function GetCurveLength() As Long
  • Function GetCurveNodeCount() As Long
  • Function GetCurveSubpathCount() As Long
  • Function GetDocumentCount() As Long
  • Function GetDocumentName() As String
  • Function GetEllipseClockwise() As Boolean
  • Function GetEllipseEndAngle() As Double
  • Function GetEllipseStartAngle() As Double
  • Function GetEllipseType() As Long
  • Function GetFillType() As Long
  • Function GetFountainFill(ByRef Type As Long, ByRef CenterX As Long, ByRef CenterY As Long, ByRef Angle As Long, ByRef Steps As Long, ByRef Padding As Long, ByRef Blend As Long, ByRef Rate As Long, ByRef NumColors As Long) As Long
  • Function GetFountainFillColor(ByVal Index As Long, ByRef Position As Long, ByRef ColorModel As Long, ByRef V1 As Long, ByRef V2 As Long, ByRef V3 As Long, ByRef V4 As Long, ByRef V5 As Long, ByRef V6 As Long, ByRef Density As Long) As Long
  • Function GetGuidelineInformation(ByVal Index As Long, ByRef Point1X As Long, ByRef Point1Y As Long, ByRef Point2X As Long, ByRef Point2Y As Long, ByRef InterceptX As Long, ByRef InterceptY As Long, ByRef Angle As Long, ByRef Locked As Boolean) As Long
  • Function GetNodeIndex(ByVal Position As Long) As Long
  • Function GetNodePosition(ByRef X As Long, ByRef Y As Long, ByVal Position As Long) As Long
  • Function GetNodeSelectedCount() As Long
  • Function GetNodeType() As Long
  • Function GetNumberOfGuidelines() As Long
  • Function GetObjectCount(ByVal Selection As Boolean, ByVal Grouped As Boolean) As Long
  • Function GetObjectData(ByVal FieldName As String) As String
  • Function GetObjectID(ByVal Index As Long, ByVal Selection As Boolean, ByVal Grouped As Boolean) As Long
  • Function GetObjectsCDRStaticID() As Long
  • Function GetObjectType() As Long
  • Function GetOutline(ByRef Width As Long, ByRef Type As Long, ByRef EndCaps As Long, ByRef JoinType As Long, ByRef Aspect As Long, ByRef Angle As Long, ByRef DotDash As Long, ByRef RightArrow As Long, ByRef LeftArrow As Long, ByRef BehindFill As Boolean, ByRef ScalePen As Boolean) As Long
  • Function GetOutlineColor(ByRef ColorModel As Long, ByRef V1 As Long, ByRef V2 As Long, ByRef V3 As Long, ByRef V4 As Long, ByRef V5 As Long, ByRef V6 As Long, ByRef Density As Long) As Long
  • Function GetPageCount() As Long
  • Function GetPageSize(ByRef Width As Long, ByRef Height As Long) As Long
  • Function GetPaletteColor(ByVal Index As Long, ByRef ColorModel As Long, ByRef V1 As Long, ByRef V2 As Long, ByRef V3 As Long, ByRef V4 As Long, ByRef V5 As Long, ByRef V6 As Long, ByRef V7 As Long) As Long
  • Function GetPaletteColorCount() As Long
  • Function GetPaletteColorName(ByVal Index As Long) As String
  • Function GetPolygonSharpness() As Long
  • Function GetPolygonSides() As Long
  • Function GetPolygonType() As Long
  • Function GetPosition(ByRef XPos As Long, ByRef YPos As Long) As Long
  • Function GetRectangleRadius(ByRef Radius1 As Double, ByRef Radius2 As Double, ByRef Radius3 As Double, ByRef Radius4 As Double) As Long
  • Function GetSegmentLength() As Long
  • Function GetSegmentType() As Long
  • Function GetSize(ByRef XSize As Long, ByRef YSize As Long) As Long
  • Function GetTextFontName() As String
  • Function GetTextFontSize() As Long
  • Function GetTextString() As String
  • Function GetTextWordCount() As Long
  • Function GetUniformFillColor(ByRef ColorModel As Long, ByRef V1 As Long, ByRef V2 As Long, ByRef V3 As Long, ByRef V4 As Long, ByRef V5 As Long, ByRef V6 As Long, ByRef Density As Long) As Long
  • Function GetUserClick(ByRef XCoord As Long, ByRef YCoord As Long, ByVal TimeOut As Long, ByVal IgnoreSnap As Boolean) As Long
  • Function GetUserDataField(ByVal FieldName As String) As String
  • Function GetWorkspaceCount() As Long
  • Function GetWorkspaceDescription(ByVal Name As String) As String
  • Function GetWorkspaceName(ByVal Index As Long) As String
  • Function Group() As Long
  • Function InflateBitmap(ByVal Width As Long, ByVal Height As Long, ByVal InflationType As Long) As Long
  • Function InitBezierTool() As Long
  • Function InsertOLEObject(ByVal ProgID As String) As Long
  • Function InsertOLEObjectFromFile(ByVal FileName As String, ByVal CreateLink As Boolean) As Long
  • Function InsertPages(ByVal BeforePage As Boolean, ByVal NumberOfPages As Long, ByVal StartPageNumber As Long) As Long
  • Function InsertPaletteColor(ByVal Index As Long, ByVal Name As String, ByVal ColorModel As Long, ByVal V1 As Long, ByVal V2 As Long, ByVal V3 As Long, ByVal V4 As Long, ByVal V5 As Long, ByVal V6 As Long, ByVal V7 As Long) As Long
  • Function Intersection(ByVal LeaveTarget As Boolean, ByVal LeaveModifiers As Boolean) As Long
  • Function IsBitmapExternallyLinked() As Boolean
  • Function IsDefaultWorkspace(ByVal Name As String) As Long
  • Function IsDocument() As Boolean
  • Function IsSelection() As Boolean
  • Function LoadPalette(ByVal FileName As String) As Long
  • Function LoadStyles(ByVal StyleSheet As String) As Long
  • Function LockGuidelineByIndex(ByVal Index As Long) As Long
  • Function MenuCommand(ByVal MenuID As Long) As Long
  • Function MergeBackText(ByVal SourceFile As String) As Boolean
  • Function MoveBezierControl(ByVal X As Long, ByVal Y As Long, ByVal Constrain As Boolean) As Long
  • Function MoveCenter(ByVal AnchorID As Long, ByVal XOffset As Long, ByVal YOffset As Long) As Long
  • Function MoveGuidelineUsingAngleByIndex(ByVal Index As Long, ByVal InterceptX As Long, ByVal InterceptY As Long, ByVal Angle As Long, ByVal Locked As Boolean) As Long
  • Function MoveGuidelineUsingTwoPointsByIndex(ByVal Index As Long, ByVal Point1X As Long, ByVal Point1Y As Long, ByVal Point2X As Long, ByVal Point2Y As Long, ByVal Locked As Boolean) As Long
  • Function MoveLayerTo(ByVal DestLayer As String, ByVal BeforeDest As Boolean) As Long
  • Function MoveNode(ByVal DeltaX As Long, ByVal DeltaY As Long) As Long
  • Function MoveObject(ByVal XDelta As Long, ByVal YDelta As Long) As Long
  • Function MoveToLayer(ByVal LayerName As String) As Long
  • Function NewLayer(ByVal LayerName As String) As Long
  • Function OLEObjectDoVerb(ByVal Verb As Long) As Long
  • Function OrderBackOne() As Long
  • Function OrderForwardOne() As Long
  • Function OrderObjectDataFields(ByVal FieldToMove As Long, ByVal NewPosition As Long) As Long
  • Function OrderReverseOrder() As Long
  • Function OrderToBack() As Long
  • Function OrderToFront() As Long
  • Function OverPrintFill() As Long
  • Function OverPrintOutline() As Long
  • Function PasteCustomClipboardFormat(ByVal Format As String) As Long
  • Function PasteFromClipboard() As Boolean
  • Function PasteObjectData(ByVal Index As Long, ByVal FieldName As String) As Long
  • Function PasteSystemClipboardFormat(ByVal Format As Long) As Long
  • Function PlaceInside(ByVal Index As Long, ByVal XDisp As Long, ByVal YDisp As Long, ByVal ForceCenter As Boolean, ByVal Center As Boolean) As Long
  • Function RecorderApplyPerspective(ByVal Type As Long, ByVal Flags As Long, ByVal Box0X As Long, ByVal Box0Y As Long, ByVal Box1X As Long, ByVal Box1Y As Long, ByVal Box2X As Long, ByVal Box2Y As Long, ByVal Box3X As Long, ByVal Box3Y As Long, ByVal VPHorizRef As Long, ByVal VPHorizX As Long, ByVal VPHorizY As Long, ByVal VPVertRef As Long, ByVal VPVertX As Long, ByVal VPVertY As Long) As Long
  • Function RecorderBeginEditParaText() As Long
  • Function RecorderBeginEditText() As Long
  • Function RecorderEditParaReplaceText(ByVal String As String) As Long
  • Function RecorderEditParaTextChangeCase(ByVal CaseID As Long) As Long
  • Function RecorderEditParaTextCharAttributes(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal FontName As String, ByVal FontStyle As Long, ByVal PointSize As Long, ByVal Underline As Long, ByVal Overline As Long, ByVal StrikeOut As Long, ByVal Placement As Long) As Long
  • Function RecorderEditParaTextIndents(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal FirstLine As Long, ByVal RestOfLines As Long, ByVal RightMargin As Long) As Long
  • Function RecorderEditParaTextSpacing(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal CharacterSpacing As Long, ByVal WordSpacing As Long, ByVal LineSpacing As Long, ByVal BeforeParagraph As Long, ByVal AfterParagraph As Long, ByVal Alignment As Long, ByVal AutoHyphenation As Boolean, ByVal HyphenHotZone As Long, ByVal Direction As Long) As Long
  • Function RecorderEditReplaceText(ByVal String As String) As Long
  • Function RecorderEditTextChangeCase(ByVal CaseID As Long) As Long
  • Function RecorderEditTextCharAttributes(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal FontName As String, ByVal FontStyle As Long, ByVal PointSize As Long, ByVal Underline As Long, ByVal Overline As Long, ByVal StrikeOut As Long, ByVal Placement As Long, ByVal Effect As Long, ByVal CharacterSpacing As Long, ByVal WordSpacing As Long, ByVal LineSpacing As Long, ByVal Alignment As Long, ByVal Direction As Long) As Long
  • Function RecorderEndEditParaText() As Long
  • Function RecorderEndEditText() As Long
  • Function RecorderObjectScaleInfo(ByVal ScaledSizeX As Long, ByVal ScaledSizeY As Long, ByVal DisplacementX As Long, ByVal DisplacementY As Long) As Long
  • Function RecorderSelectObjectByIndex(ByVal ClearFirst As Boolean, ByVal Index As Long) As Long
  • Function RecorderSelectObjectsByIndex(ByVal ClearFirst As Boolean, ByVal Index1 As Long, ByVal Index2 As Long, ByVal Index3 As Long, ByVal Index4 As Long, ByVal Index5 As Long) As Long
  • Function RecorderSelectPreselectedObjects(ByVal ClearFirst As Boolean) As Long
  • Function RecorderStorePreselectedObjects(ByVal ConvertPreset As Boolean) As Long
  • Function Redo() As Long
  • Function RedrawAllScreens() As Long
  • Function RedrawScreen() As Long
  • Function RegisterObject(ByVal ObjectID As String) As Boolean
  • Function RemoveAllGuidelines() As Long
  • Function RemoveFountainFillColor(ByVal Position As Long) As Long
  • Function RenameObjectDataField(ByVal OldFieldName As String, ByVal NewFieldName As String) As Long
  • Function RenameStyle(ByVal OldName As String, ByVal NewName As String) As Long
  • Function Repeat() As Long
  • Function RepeatLastCommand() As Long
  • Function ReplacePaletteColor(ByVal Index As Long, ByVal Name As String, ByVal ColorModel As Long, ByVal V1 As Long, ByVal V2 As Long, ByVal V3 As Long, ByVal V4 As Long, ByVal V5 As Long, ByVal V6 As Long, ByVal V7 As Long) As Long
  • Function ResetTransfo() As Long
  • Function ResolveAllBitmapsLink() As Long
  • Function ResolveBitmapLink() As Long
  • Function ResumePainting() As Long
  • Function RevertToStyle() As Long
  • Function RotateObject(ByVal Angle As Long, ByVal UseObjectsCenter As Boolean, ByVal XCenter As Long, ByVal YCenter As Long) As Long
  • Function SavePalette(ByVal FileName As String, ByVal Overwrite As Boolean) As Long
  • Function SaveStyleAs(ByVal Style As String, ByVal Fill As Boolean, ByVal Outline As Boolean, ByVal TypeFace As Boolean, ByVal TypeStyle As Boolean, ByVal Size As Boolean, ByVal Justify As Boolean, ByVal Tabs As Boolean, ByVal Hyphenation As Boolean, ByVal SpaceChar As Boolean, ByVal SpaceWord As Boolean, ByVal SpaceLine As Boolean, ByVal BeforePara As Boolean, ByVal AfterPara As Boolean, ByVal Underline As Boolean, ByVal Overline As Boolean, ByVal StrikeOut As Boolean, ByVal BulletIndent As Boolean, ByVal FirstLineIndent As Boolean, ByVal RestOfLinesIndent As Boolean, ByVal RightMargin As Boolean, ByVal SuperOrSubScript As Boolean, ByVal Capitalize As Boolean, ByVal Bullet As Boolean) As Long
  • Function SaveStyleProp(ByVal StyleName As String, ByVal UseFill As Boolean, ByVal UseOutline As Boolean, ByVal UseFont As Long, ByVal UseAlignment As Long, ByVal UseSpacing As Long, ByVal UseLines As Long, ByVal UseIndentsAndMargins As Long, ByVal UseTextEffects As Long) As Long
  • Function SaveTemplate(ByVal StyleSheet As String) As Long
  • Function SelectAllObjects() As Long
  • Function SelectLayer(ByVal LayerName As String) As Long
  • Function SelectNextNode() As Long
  • Function SelectNextObject(ByVal SelectInsideGroup As Boolean) As Boolean
  • Function SelectNode(ByVal Index As Long, ByVal AddToSelection As Boolean) As Long
  • Function SelectNodeAt(ByVal X As Long, ByVal Y As Long, ByVal AddToSelection As Boolean) As Long
  • Function SelectObjectAtPoint(ByVal XPos As Long, ByVal YPos As Long, ByVal SelectInsideGroup As Boolean) As Boolean
  • Function SelectObjectOfCDRStaticID(ByVal CorelDRAWID As Long) As Boolean
  • Function SelectObjectOfType(ByVal Type As Long) As Long
  • Function SelectObjectsInRect(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long, ByVal IncludeIntersecting As Boolean) As Boolean
  • Function SelectPreviousObject(ByVal SelectInsideGroup As Boolean) As Boolean
  • Function Separate() As Long
  • Function SetApplyToDuplicate(ByVal ApplyToDuplicate As Boolean) As Long
  • Function SetArtisticText(ByVal String As String) As Long
  • Function SetBullet(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal SymbolLibrary As String, ByVal SymbolNumber As Long, ByVal PointSize As Long, ByVal BulletIndent As Long, ByVal VerticalShift As Long) As Long
  • Function SetCharacterAttributes(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal FontName As String, ByVal FontStyle As Long, ByVal PointSize As Long, ByVal Underline As Long, ByVal Overline As Long, ByVal StrikeOut As Long, ByVal Placement As Long, ByVal CharacterSpacing As Long, ByVal WordSpacing As Long, ByVal LineSpacing As Long, ByVal Alignment As Long) As Long
  • Function SetColorOverride(ByVal Override As Boolean) As Long
  • Function SetCornerRoundness(ByVal Roundness As Long, ByVal Roundness2 As Long, ByVal Roundness3 As Long, ByVal Roundness4 As Long) As Long
  • Function SetCurrentDocument() As Boolean
  • Function SetCurrentPage(ByVal CurrentPage As Long) As Long
  • Function SetCurrentPageName(ByVal Name As String) As Long
  • Function SetCurrentPageOrientation(ByVal Orient As Long) As Long
  • Function SetCurrentPageSize(ByVal Width As Long, ByVal Height As Long) As Long
  • Function SetCurrentWorkspace(ByVal Name As String) As Long
  • Function SetDocVisible(ByVal Show As Boolean) As Long
  • Function SetEllipseProperties(ByVal Arc As Boolean, ByVal StartAngle As Long, ByVal EndAngle As Long) As Long
  • Function SetErrorHandling(ByVal Msg As Boolean) As Boolean
  • Function SetFrameColumn(ByVal ColumnNumber As Long, ByVal Width As Long, ByVal GutterWidth As Long) As Long
  • Function SetFullScreenPreview(ByVal FullScreen As Boolean) As Long
  • Function SetIndents(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal FirstLine As Long, ByVal RestOfLines As Long, ByVal RightMargin As Long) As Long
  • Function SetLayerLocked(ByVal Locked As Boolean, ByVal LayerName As String, ByVal PageNum As Long) As Long
  • Function SetLayerPrintable(ByVal Printable As Boolean, ByVal LayerName As String, ByVal PageNum As Long) As Long
  • Function SetLayerVisible(ByVal Visible As Boolean, ByVal LayerName As String, ByVal PageNum As Long) As Long
  • Function SetMultiLayer(ByVal MultiLayer As Boolean) As Long
  • Function SetNodeType(ByVal Type As Long) As Long
  • Function SetObjectData(ByVal FieldName As String, ByVal FieldValue As String) As Long
  • Function SetOptionsForAllPages(ByVal AllPages As Boolean) As Long
  • Function SetOutlineArrow(ByVal ArrowType As Long) As Long
  • Function SetOutlineColor() As Long
  • Function SetOutlineMiscProperties(ByVal Type As Long, ByVal Style As Long, ByVal Corners As Long, ByVal LineCaps As Long, ByVal Aspect As Long, ByVal Angle As Long, ByVal BehindFill As Boolean, ByVal ScalePen As Boolean) As Long
  • Function SetOutlineWidth(ByVal Width As Long) As Long
  • Function SetPageLayout(ByVal LayoutType As Long) As Long
  • Function SetPageOrientation(ByVal Orient As Long) As Long
  • Function SetPageSize(ByVal Width As Long, ByVal Height As Long) As Long
  • Function SetPageSizeFromPrinter() As Long
  • Function SetPaperColor() As Long
  • Function SetParagraphSpacing(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal CharacterSpacing As Long, ByVal WordSpacing As Long, ByVal LineSpacing As Long, ByVal BeforeParagraph As Long, ByVal AfterParagraph As Long, ByVal Alignment As Long, ByVal AutoHyphenation As Boolean, ByVal HyphenHotZone As Long) As Long
  • Function SetPolygonProperties(ByVal Star As Boolean, ByVal Points As Long, ByVal Sharpness As Long) As Long
  • Function SetPosition(ByVal XPos As Long, ByVal YPos As Long) As Long
  • Function SetReferencePoint(ByVal ReferencePoint As Long) As Long
  • Function SetSegmentType(ByVal Type As Long) As Long
  • Function SetSize(ByVal XSize As Long, ByVal YSize As Long) As Long
  • Function SetTextString(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long, ByVal Text As String) As Long
  • Function SetToMasterLayer(ByVal Master As Boolean, ByVal LayerName As String) As Long
  • Function SetUserDataField(ByVal FieldName As String, ByVal FieldValue As String) As Long
  • Function SetVisible(ByVal Visible As Boolean) As Long
  • Function ShareExtrudeVP(ByVal ExtrudeIndex As Long, ByVal VPToShareIndex As Long, ByVal SharedVP As Boolean) As Long
  • Function ShowPageBorder(ByVal ShowBorder As Boolean) As Long
  • Function SkewObject(ByVal XAngle As Long, ByVal YAngle As Long, ByVal Reference As Long) As Long
  • Function SplitBlend(ByVal PositionX As Long, ByVal PositionY As Long) As Long
  • Function StartEditContents() As Long
  • Function StartOfRecording() As Long
  • Function StopEditContents() As Long
  • Function StoreColor(ByVal ColorModel As Long, ByVal V1 As Long, ByVal V2 As Long, ByVal V3 As Long, ByVal V4 As Long, ByVal V5 As Long, ByVal V6 As Long, ByVal V7 As Long, ByVal Position As Long) As Long
  • Function StraightenText(ByVal FirstSelectedChar As Long, ByVal LastSelectedChar As Long) As Long
  • Function StretchObject(ByVal XScaleNumerator As Double, ByVal XScaleDenominator As Double, ByVal YScaleNumerator As Double, ByVal YScaleDenominator As Double, ByVal HMirror As Boolean, ByVal VMirror As Boolean, ByVal ReferenceNum As Long) As Long
  • Function SuppressPainting(ByVal ShowDialog As Boolean) As Long
  • Function Trim(ByVal LeaveTarget As Boolean, ByVal LeaveModifiers As Boolean) As Long
  • Function Undo() As Long
  • Function Ungroup() As Long
  • Function UngroupAll() As Long
  • Function UnlockGuidelineByIndex(ByVal Index As Long) As Long
  • Function UnRegisterObject(ByVal ObjectID As String) As Boolean
  • Function UnSelectAll() As Long
  • Function UpdateBitmapLink() As Long
  • Function Weld(ByVal LeaveTarget As Boolean, ByVal LeaveModifiers As Boolean) As Long
  • Function ZoomIn() As Long
  • Function ZoomOut() As Long
  • Function ZoomToAllObjects() As Long
  • Function ZoomToHeight() As Long
  • Function ZoomToPage() As Long
  • Function ZoomToRectangle(ByVal Top As Long, ByVal Left As Long, ByVal Bottom As Long, ByVal Right As Long) As Long
  • Function ZoomToSelection() As Long
  • Function ZoomToWidth() As Long

Class CorelScriptFile

Properties:

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

Methods:

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

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 Curve

Properties:

  • Property Close As Boolean [r/w]
  • Property Length As Double [r/o]
  • Property NodeCount As Long [r/o]
  • Property SubPathCount As Long [r/o]

Class Document

Properties:

  • Property ActiveLayer As Layer [r/o]
  • Property ActivePage As Page [r/o]
  • Property ActiveWindow As Window [r/o]
  • Property Application As Application [r/o]
  • Property ApplyToDuplicate As Boolean [r/w]
  • Property Dirty As Boolean [r/w]
  • Property DrawingOriginX As Double [r/w]
  • Property DrawingOriginY As Double [r/w]
  • Property Name As String [r/w]
  • Property Pages As Pages [r/o]
  • Property Parent As Documents [r/o]
  • Property ReferencePoint As cdrReferencePoint [r/w]
  • Property Unit As cdrUnit [r/w]
  • Property Windows As Windows [r/o]

Methods:

  • Sub Activate()
  • Function AddPages(ByVal NumberOfPages As Long) As Page
  • Sub ClearSelection()
  • Sub Close()
  • Sub Export(ByVal FileName As String, ByVal Filter As cdrFilter, [ByVal Range As cdrExportRange = cdrCurrentPage (1)], [ByVal Options As StructExportOptions = 0])
  • Function InsertPages(ByVal NumberOfPages As Long, ByVal BeforePage As Boolean, ByVal Page As Long) As Page
  • Sub Print()
  • Sub Redo()
  • Sub Repeat()
  • Sub ResolveAllBitmapsLinks()
  • Sub Save()
  • Sub SaveAs(ByVal FileName As String, [ByVal Options As StructSaveAsOptions = 0])
  • Function Selection() As Shape
  • Sub Undo()

Events:

  • Event AfterPrint()
  • Event AfterSave(ByVal FileName As String)
  • Event AfterSaveAs(ByVal FileName As String)
  • Event BeforeClose()
  • Event BeforePrint()
  • Event BeforeSave()
  • Event BeforeSaveAs()
  • Event LayerCreated(ByRef Layer As Layer)
  • Event LayerSelected(ByRef Layer As Layer)
  • Event PageCreated(ByRef Page As Page)
  • Event PageSelected(ByRef Page As Page)
  • Event ShapeCreated(ByRef Shape As Shape)
  • Event ShapeMoved(ByRef Shape As Shape)

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 Ellipse

Properties:

  • Property Clockwise As Boolean [r/w]
  • Property EndAngle As Double [r/w]
  • Property StartAngle As Double [r/w]
  • Property Type As cdrEllipseType [r/w]

Class Fill

Properties:

  • Property FountainAngle As Double [r/w]
  • Property FountainBlendType As cdrFountainFillBlendType [r/w]
  • Property FountainCenterX As Long [r/w]
  • Property FountainCenterY As Long [r/w]
  • Property FountainColorsCount As Long [r/o]
  • Property FountainEdgePad As Long [r/w]
  • Property FountainMidPointPosition As Long [r/w]
  • Property FountainProperties As StructFountainFillProperties [r/w]
  • Property FountainSteps As Long [r/w]
  • Property FountainType As cdrFountainFillType [r/w]
  • Property Type As cdrFillType [r/o]
  • Property UniformColor As Color [r/w]

Methods:

  • 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 Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal Index As Long) As String [r/o] [default]
  • Property Parent As Application [r/o]

Class GlobalDocument

Events:

  • Event AfterPrint()
  • Event AfterSave(ByVal FileName As String)
  • Event AfterSaveAs(ByVal FileName As String)
  • Event BeforeClose()
  • Event BeforePrint()
  • Event BeforeSave()
  • Event BeforeSaveAs()
  • Event CorelScriptStartPlaying()
  • Event CorelScriptStartRecording()
  • Event CorelScriptStopPlaying()
  • Event CorelScriptStopRecording(ByVal FileName As String)
  • Event LayerCreated(ByRef Layer As Layer)
  • Event LayerSelected(ByRef Layer As Layer)
  • Event NewDocument(ByVal Document As Document)
  • Event OpenDocument(ByVal Document As Document)
  • Event PageCreated(ByRef Page As Page)
  • Event PageSelected(ByRef Page As Page)
  • Event Quit()
  • Event ShapeCreated(ByRef Shape As Shape)
  • Event ShapeMoved(ByRef Shape As Shape)
  • Event Start()

Class Layer

Properties:

  • Property Application As Application [r/o]
  • Property Color As Color [r/w]
  • Property Editable As Boolean [r/w]
  • Property Master As Boolean [r/w]
  • Property Name As String [r/w]
  • Property OverrideColor As Boolean [r/w]
  • Property Parent As Layers [r/o]
  • Property Printable As Boolean [r/w]
  • Property Shapes As Shapes [r/o]
  • Property Visible As Boolean [r/w]

Methods:

  • Sub Activate()
  • Function CreateArtisticText(ByVal Left As Double, ByVal Bottom As Double, ByVal Text As String) As Shape
  • Function CreateEllipse(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, [ByVal StartAngle As Double = 90], [ByVal EndAngle As Double = 90], [ByVal Arc As Boolean = False]) As Shape
  • Function CreateGridBoxes(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, ByVal Wide As Long, ByVal High As Long) 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 CreatePolygon(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, ByVal Sides As Long, [ByVal Subpaths As Long = 1], [ByVal Complexity As Long = 1], [ByVal Star As Boolean = False], [ByVal StarComplexity As Long = 50], [ByVal MaxComplexity As Long = 100]) As Shape
  • Function CreateRectangle(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, [ByVal CornerUL As Long = 0], [ByVal CornerUR As Long = 0], [ByVal CornerLR As Long = 0], [ByVal CornerLL As Long = 0]) As Shape
  • Function CreateSpiral(ByVal Left As Double, ByVal Top As Double, ByVal Right As Double, ByVal Bottom As Double, ByVal NumRevolutions As Long, ByVal SpiralType As cdrSpiralType, ByVal GrowthRate As Long) As Shape
  • Sub Delete()
  • Sub Import(ByVal FileName As String, [ByVal Filter As cdrFilter = cdrAutoSense (0)], [ByVal MaintainLayersAndPages As Boolean = False])
  • Sub MoveAbove(ByVal Layer As Layer)
  • Sub MoveBelow(ByVal Layer As Layer)

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 Page [r/o]

Class Outline

Properties:

  • Property Color As Color [r/w]
  • Property Type As cdrOutlineType [r/w]
  • Property Width As Double [r/w]

Methods:

  • Sub ConvertToObject()

Class Page

Properties:

  • Property ActiveLayer As Layer [r/o]
  • Property Application As Application [r/o]
  • Property Bleed As Double [r/w]
  • Property Index As Long [r/o]
  • Property Layers As Layers [r/o]
  • Property Name As String [r/w]
  • Property Orientation As cdrPageOrientation [r/w]
  • Property Paper As String [r/o]
  • Property Parent As Pages [r/o]
  • Property Resolution As Long [r/w]
  • Property Shapes As Shapes [r/o]
  • Property SizeHeight As Double [r/w]
  • Property SizeWidth As Double [r/w]

Methods:

  • Sub Activate()
  • Function CreateLayer(ByVal LayerName As String) As Layer
  • Sub Delete()
  • Function TextFind(ByVal Text As String, ByVal CaseSensitive As Boolean) As Shape
  • Sub TextReplace(ByVal OldText As String, ByVal NewText As String, ByVal CaseSensitive As Boolean, [ByVal ReplaceSelectedOnly As Boolean = True])

Class Pages

Properties:

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

Class Palette

Properties:

  • Property Application As Application [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 Parent As Palettes [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)

Class Palettes

Properties:

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

Methods:

  • Function Create(ByVal Name As String, [ByVal Overwrite As Boolean = False]) As Palette
  • Function CreateFromDocument(ByVal Name As String, [ByVal Overwrite As Boolean = False]) As Palette
  • Function CreateFromSelection(ByVal Name 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 Polygon

Properties:

  • Property Sharpness As Long [r/w]
  • Property Sides As Long [r/w]
  • Property Type As cdrPolygonType [r/w]

Class Rectangle

Properties:

  • Property CornerLowerLeft As Long [r/w]
  • Property CornerLowerRight As Long [r/w]
  • Property CornerUpperLeft As Long [r/w]
  • Property CornerUpperRight As Long [r/w]

Class Shape

Properties:

  • Property Application As Application [r/o]
  • Property Bitmap As Bitmap [r/o]
  • Property Curve As Curve [r/o]
  • Property Ellipse As Ellipse [r/o]
  • Property Fill As Fill [r/o]
  • Property Layer As Layer [r/w]
  • Property Name As String [r/w]
  • Property Outline As Outline [r/o]
  • Property Parent As Object [r/o]
  • Property Polygon As Polygon [r/o]
  • Property PositionX As Double [r/w]
  • Property PositionY As Double [r/w]
  • Property Rectangle As Rectangle [r/o]
  • Property RotationAngle As Double [r/w]
  • Property RotationCenterX As Double [r/w]
  • Property RotationCenterY As Double [r/w]
  • Property Select As Boolean [r/w]
  • Property Shapes As Shapes [r/o]
  • Property SizeHeight As Double [r/w]
  • Property SizeWidth As Double [r/w]
  • Property StaticID As Long [r/o]
  • Property Text As Text [r/o]
  • Property Type As cdrShapeType [r/o]

Methods:

  • Sub AddToSelection()
  • 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
  • Sub ConvertToCurves()
  • Sub Delete()
  • Function Duplicate([ByVal OffsetX As Double = 0], [ByVal OffsetY As Double = 0]) As Shape
  • Sub Group()
  • 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)
  • Function OrderIsInFrontOf(ByVal Shape As Shape) As Boolean
  • Sub OrderToBack()
  • Sub OrderToFront()
  • Sub RemoveFromSelection()
  • Sub Rotate(ByVal Angle As Double)
  • Sub Separate()
  • Sub Skew(ByVal AngleX As Double, ByVal AngleY As Double)
  • Sub Ungroup()
  • Sub UngroupAll()

Class Shapes

Properties:

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

Class StructAlignProperties

Properties:

  • Property Alignment As cdrAlignment [r/w]
  • Property CharacterRotation As Single [r/w]
  • Property FirstLineIndent As Double [r/w]
  • Property HorizontalCharacterShift As Long [r/w]
  • Property LeftIndent As Double [r/w]
  • Property MaxCharacterSpacing As Single [r/w]
  • Property MaxWordSpacing As Single [r/w]
  • Property MinWordSpacing As Single [r/w]
  • Property RightIndent As Double [r/w]
  • Property VerticalCharacterShift As Long [r/w]

Class StructExportOptions

Properties:

  • Property AntiAliasingType As cdrAntiAliasingType [r/w]
  • Property ImageType As cdrImageType [r/w]
  • Property Overwrite As Boolean [r/w]
  • Property ResolutionX As Long [r/w]
  • Property ResolutionY As Long [r/w]
  • Property SizeX As Long [r/w]
  • Property SizeY As Long [r/w]

Class StructFontProperties

Properties:

Class StructFountainFillProperties

Properties:

  • Property Angle As Double [r/w]
  • Property BlendType As cdrFountainFillBlendType [r/w]
  • Property CenterX As Long [r/w]
  • Property CenterY As Long [r/w]
  • Property ColorCount As Long [r/o]
  • Property EdgePad As Long [r/w]
  • Property FromColor As Color [r/w]
  • Property MidPoint As Long [r/w]
  • Property Steps As Long [r/w]
  • Property ToColor As Color [r/w]
  • Property Type As cdrFountainFillType [r/w]

Class StructHyphenationSettings

Properties:

  • Property BreakCapitalized As Boolean [r/w]
  • Property HotZone As Double [r/w]
  • Property MinCharactersAfter As Long [r/w]
  • Property MinCharactersBefore As Long [r/w]
  • Property MinWordLength As Long [r/w]
  • Property UseAutomaticHyphenation As Boolean [r/w]

Class StructSaveAsOptions

Properties:

  • Property EmbedICCProfile As Boolean [r/w]
  • Property EmbedVBAProject As Boolean [r/w]
  • Property Filter As cdrFilter [r/w]
  • Property IncludeCMXData As Boolean [r/w]
  • Property Overwrite As Boolean [r/w]
  • Property Range As cdrExportRange [r/w]
  • Property ThumbnailSize As cdrThumbnailSize [r/w]
  • Property Version As cdrFileVersion [r/w]

Class StructSpaceProperties

Properties:

  • Property AfterParagraphSpacing As Single [r/w]
  • Property BeforeParagraphSpacing As Single [r/w]
  • Property CharacterSpacing As Single [r/w]
  • Property LineSpacing As Single [r/w]
  • Property LineSpacingType As cdrLineSpacingType [r/w]
  • Property WordSpacing As Single [r/w]

Class Text

Properties:

  • Property AlignProperties([ByVal Frames As cdrTextFrames = cdrAllFrames (2)]) As StructAlignProperties [r/w]
  • Property AlignPropertiesInRange(ByVal StartIndex As Long, ByVal Size As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructAlignProperties [r/w]
  • Property CharacterCount As Long [r/o]
  • Property Characters(ByVal StartIndex As Long, [ByVal Size As Long = 1]) As String [r/w]
  • Property Contents([ByVal Frames As cdrTextFrames = cdrAllFrames (2)]) As String [r/w]
  • Property FittedDistanceFromPath As Double [r/w]
  • Property FittedHorizOffset As Double [r/w]
  • Property FittedOrientation As cdrFittedOrientation [r/w]
  • Property FittedPlacement As cdrFittedPlacement [r/w]
  • Property FittedPlaceOnOtherSide As Boolean [r/w]
  • Property FittedQuadrant As cdrFittedQuadrant [r/w]
  • Property FittedVertPlacement As cdrFittedVertPlacement [r/w]
  • Property FontProperties([ByVal Frames As cdrTextFrames = cdrAllFrames (2)]) As StructFontProperties [r/w]
  • Property FontPropertiesInRange(ByVal StartIndex As Long, ByVal Size As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructFontProperties [r/w]
  • Property FramesInLink As Long [r/o]
  • Property HyphenationSettings([ByVal Frames As cdrTextFrames = cdrAllFrames (2)]) As StructHyphenationSettings [r/w]
  • Property HyphenationSettingsInRange(ByVal StartIndex As Long, ByVal Size As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructHyphenationSettings [r/w]
  • Property LineCount As Long [r/o]
  • Property Overflow As Boolean [r/o]
  • Property ParagraphCount As Long [r/o]
  • Property Paragraphs(ByVal StartIndex As Long, [ByVal Size As Long = 1]) As String [r/w]
  • Property SpaceProperties([ByVal Frames As cdrTextFrames = cdrAllFrames (2)]) As StructSpaceProperties [r/w]
  • Property SpacePropertiesInRange(ByVal StartIndex As Long, ByVal Size As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As StructSpaceProperties [r/w]
  • Property Type As cdrTextType [r/o]
  • Property UnusedFramesInLink As Long [r/o]
  • Property WordCount As Long [r/o]
  • Property Words(ByVal StartIndex As Long, [ByVal Size As Long = 1]) As String [r/w]

Methods:

  • Sub ConvertToArtistic()
  • Sub ConvertToParagraph()
  • Sub ExportToFile(ByVal FileName As String, ByVal StartIndex As Long, ByVal Size As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)])
  • Function Find(ByVal Text As String, ByVal CaseSensitive As Boolean, [ByVal StartIndex As Long = 1], [ByVal WrapAround As Boolean = False], [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)]) As Long
  • Sub FitToPath(ByVal pPath As Shape)
  • Sub ImportFromFile(ByVal FileName As String, ByVal StartIndex As Long, [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)])
  • Sub LinkToFrame(ByVal pVal As Text)
  • Sub Replace(ByVal OldText As String, ByVal NewText As String, ByVal CaseSensitive As Boolean, [ByVal StartIndex As Long = 1], [ByVal ReplaceAll As Boolean = False], [ByVal WrapAround As Boolean = False], [ByVal IndexingType As cdrTextIndexingType = cdrCharacterIndexing (0)])

Class Window

Properties:

  • Property Application As Application [r/o]
  • Property FullScreen As Boolean [r/w]
  • Property Name As String [r/w]
  • Property Page As Page [r/o]
  • Property Parent As Windows [r/o]
  • Property Type As cdrViewType [r/w]

Methods:

  • Sub Activate()
  • Sub Close()
  • 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 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]

Class Workspace

Properties:

  • Property Application As Application [r/o]
  • Property Current As Boolean [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 Application [r/o]
  • Property Count As Long [r/o]
  • Property Item(ByVal IndexOrName As Variant) As Workspace [r/o] [default]
  • Property Parent As Application [r/o]

Enum cdrAlignment

  • cdrNoAlignment As Long=0
  • cdrLeftAlignment As Long=1
  • cdrRightAlignment As Long=2
  • cdrCenterAlignment As Long=3
  • cdrFullJustifyAlignment As Long=4
  • cdrForceJustifyAlignment As Long=5

Enum cdrAntiAliasingType

  • cdrNoAntiAliasing As Long=0
  • cdrNormalAntiAliasing As Long=1
  • cdrSupersampling As Long=2

Enum cdrColorType

  • cdrPantone As Long=1
  • cdrCMYK As Long=2
  • cdrCMY As Long=4
  • cdrRGB As Long=5
  • cdrHSB As Long=6
  • cdrHLS As Long=7
  • cdrBlackAndWhite As Long=8
  • cdrGray As Long=9

Enum cdrEllipseType

  • cdrEllipse As Long=0
  • cdrArc As Long=1
  • cdrPie As Long=2

Enum cdrExportRange

  • cdrAllPages As Long=0
  • cdrCurrentPage As Long=1
  • cdrSelection As Long=2

Enum cdrFileVersion

  • cdrCurrentVersion As Long=0
  • cdrVersion5 As Long=5
  • cdrVersion6 As Long=6
  • cdrVersion7 As Long=7
  • cdrVersion8 As Long=8
  • cdrVersion9 As Long=9

Enum cdrFillType

  • cdrNoFill As Long=0
  • cdrUniformFill As Long=1
  • cdrFountainFill As Long=2
  • cdrPostscriptFill As Long=3
  • cdrMonoBitmapFill As Long=4
  • cdrReservedFill As Long=5
  • cdrColorBitmapFill As Long=6
  • cdrVectorFill As Long=7
  • cdrTextureFill As Long=8

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
  • cdrAI2 As Long=1305
  • 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
  • cdtPAT As Long=1801
  • cdrCPT9 As Long=1808
  • cdrCPH As Long=1803

Enum cdrFittedOrientation

  • cdrRotateOrientation As Long=0
  • cdrVerticalSkewOrientation As Long=1
  • cdrHorizontalSkewOrientation As Long=2
  • cdrUprightOrientation As Long=3

Enum cdrFittedPlacement

  • cdrLeftPlacement As Long=0
  • cdrRightPlacement As Long=1
  • cdrCenterPlacement As Long=2

Enum cdrFittedQuadrant

  • cdrLeftQuadrant As Long=0
  • cdrRightQuadrant As Long=1
  • cdrTopQuadrant As Long=2
  • cdrBottomQuadrant As Long=3

Enum cdrFittedVertPlacement

  • cdrCustomVertPlacement As Long=0
  • cdrBaselineVertPlacement As Long=1
  • cdrAscenderVertPlacement As Long=2
  • cdrDescenderVertPlacement As Long=3
  • cdrCenterVertPlacement As Long=4

Enum cdrFontCase

  • cdrNormalFontCase As Long=0
  • cdrSmallCapsFontCase As Long=1
  • cdrAllCapsFontCase As Long=2

Enum cdrFontLine

  • cdrNoFontLine As Long=0
  • cdrSingleThinFontLine As Long=1
  • cdrSingleThinWordFontLine As Long=2
  • cdrSingleThickFontLine As Long=3
  • cdrSingleThickWordFontLine As Long=4
  • cdrDoubleThinFontLine As Long=5
  • cdrDoubleThinWordFontLine As Long=6

Enum cdrFontPosition

  • cdrNormalFontPosition As Long=0
  • cdrSubscriptFontPosition As Long=1
  • cdrSuperscriptFontPosition As Long=2

Enum cdrFontStyle

  • cdrNormalFontStyle As Long=0
  • cdrBoldFontStyle As Long=1
  • cdrItalicFontStyle As Long=2
  • cdrBoldItalicFontStyle As Long=3

Enum cdrFountainFillBlendType

  • cdrDirectFountainFillBlend As Long=0
  • cdrRainbowCWFountainFillBlend As Long=1
  • cdrRainbowCCWFountainFillBlend As Long=2
  • cdrCustomFountainFillBlend As Long=3

Enum cdrFountainFillType

  • cdrLinearFountainFill As Long=1
  • cdrRadialFountainFill As Long=2
  • cdrConicalFountainFill As Long=3
  • cdrSquareFountainFill As Long=4

Enum cdrImageType

  • cdrBlackAndWhiteImage As Long=0
  • cdr16ColorsImage As Long=1
  • cdrGrayscaleImage As Long=2
  • cdrPalettedImage As Long=3
  • cdrRGBColorImage As Long=4
  • cdrCMYKColorImage As Long=5

Enum cdrLineSpacingType

  • cdrPercentOfCharacterHeightLineSpacing As Long=0
  • cdrPointLineSpacing As Long=1
  • cdrPercentOfPointSizeLineSpacing As Long=2

Enum cdrOptimization

  • cdrOptimizationOff As Long=0
  • cdrOptimizationOn As Long=1

Enum cdrOutlineType

  • cdrNoOutline As Long=0
  • cdrOutline As Long=1

Enum cdrPageOrientation

  • cdrPortrait As Long=0
  • cdrLandscape As Long=1

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=19
  • cdrPANTONEPastelCoated As Long=21
  • cdrPANTONEPastelUncoated As Long=22
  • cdrHKS As Long=23

Enum cdrPaletteType

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

Enum cdrPolygonType

  • cdrPolygon As Long=0
  • cdrStar As Long=1
  • cdrPolygonAsStar As Long=2

Enum cdrReferencePoint

  • cdrTopRight As Long=1
  • cdrTopMiddle As Long=2
  • cdrTopLeft As Long=3
  • cdrMiddleLeft As Long=4
  • cdrBottomLeft As Long=5
  • cdrBottomMiddle As Long=6
  • cdrBottomRight As Long=7
  • cdrMiddleRight As Long=8
  • cdrCenter As Long=9

Enum cdrShapeType

  • cdrNoShape As Long=0
  • cdrRectangleShape As Long=1
  • cdrEllipseShape As Long=2
  • cdrCurveShape As Long=3
  • cdrPolygonShape As Long=4
  • cdrBitmapShape As Long=5
  • cdrTextShape As Long=6
  • cdrGroupShape As Long=7
  • cdrSelectionShape As Long=8
  • cdrGuidelineShape As Long=9

Enum cdrSpiralType

  • cdrSymmetric As Long=0
  • cdrLogarithmic As Long=1

Enum cdrTextFrames

  • cdrThisFrameOnly As Long=0
  • cdrStartAtThisFrame As Long=1
  • cdrAllFrames As Long=2

Enum cdrTextIndexingType

  • cdrCharacterIndexing As Long=0
  • cdrWordIndexing As Long=1
  • cdrParagraphIndexing As Long=2

Enum cdrTextType

  • cdrArtisticText As Long=0
  • cdrParagraphText As Long=1
  • cdrArtisticFittedText As Long=2
  • cdrParagraphFittedText As Long=3

Enum cdrThumbnailSize

  • cdrNoThumbnail As Long=0
  • cdr1KMonoThumbnail As Long=1
  • cdr5KColorThumbnail As Long=2
  • cdr10KColorThumbnail As Long=3

Enum cdrUnit

  • cdrTenthMicron As Long=0
  • cdrInch As Long=1
  • cdrFoot As Long=2
  • cdrMillimeter As Long=3
  • cdrCentimeter As Long=4
  • cdrPixel As Long=5
  • cdrMile As Long=6
  • cdrMeter As Long=7
  • cdrKilometer As Long=8
  • cdrDidots As Long=9
  • cdrAgate As Long=10
  • cdrYard As Long=11
  • cdrPica As Long=12
  • cdrCicero As Long=13

Enum cdrViewType

  • cdrSimpleWireframeView As Long=0
  • cdrWireframeView As Long=1
  • cdrDraftView As Long=2
  • cdrNormalView As Long=3
  • cdrEnhancedView As Long=4

[ 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.