Description
Adds a Circle to the EvenOddTemplate object and returns a New Circle object.
Syntax
Public Function AddCircle( _
ByVal X As Single, _
ByVal Y As Single, _
ByVal Radius As Single _
) As Circle
Parameters
- X
- The X Coordinate of the Circle.
- Y
- The Y Coordinate of the Circle.
- Radius
- The radius of the Circle.
Return Type
A Circle object.
Example
[ASP - VBScript]
<!-- METADATA TYPE="typelib" UUID="{DF9225FE-94A4-490D-8CAD-E8366CE621D3}"-->
<%
' Create a PDF Document
Dim MyDocument
Set MyDocument = Server.CreateObject( "DynamicPDF.Document" )
Dim MyDocTemplate
Set MyDocTemplate = MyDocument.SetEvenOddTemplate()
MyDocument.AddPage()
MyDocument.AddPage()
' Create a Circle within the Area Group
Dim MyGroupCircle
Set MyGroupCircle = MyDocTemplate.AddCircle( 200, 150, 200 )
' Applying Color to the Circle with fillColor and BorderColor
MyGroupCircle.Apply = DPDF_ApplyColor_Both
MyGroupCircle.BorderColor = "000000" 'Black
MyGroupCircle.FillColor = "FF4500" 'Orange Red
' Draw the PDF
MyDocument.DrawToWeb
Set MyDocument = Nothing
%>
|
See Also
EvenOddTemplate Object
