Ellipse

The Ellipse function draws an ellipse. The center of the ellipse is the center of the specified bounding rectangle. The ellipse is outlined by using the current pen and is filled by using the current brush

Ellipse nLeftRect, nTopRect, nRightRect, nBottomRect

Parameters

nLeftRect
Specifies the logical x-coordinate of the upper-left corner of the bounding rectangle.

nTopRect
Specifies the logical y-coordinate of the upper-left corner of the bounding rectangle.

nRightRect
Specifies the logical x-coordinate of the lower-right corner of the bounding rectangle.

nBottomRect
Specifies the logical y-coordinate of the lower-right corner of the bounding rectangle.

Example
View result

<%@ Language=VBScript %>
<%
Response.ContentType="image/gif"
set obj=Server.CreateObject("shotgraph.image")

size=401
obj.CreateImage size,size,4

obj.SetColor 0,255,255,255
obj.SetColor 1,204,0,0
obj.SetColor 2,0,0,204
obj.SetColor 3,0,204,51
obj.SetBgColor 0
obj.FillRect 0,0,size-1,size-1

obj.SetDrawColor 2
obj.Ellipse 10,10,size-11,size-11
obj.CreatePen "PS_SOLID",4,3
obj.Ellipse 20,20,size-21,size-21
obj.CreatePen "PS_SOLID",4,1
obj.Ellipse 20,size/4,size-21,size-1-size/4

img=obj.GifImage(-1,1,"")
Response.BinaryWrite(img)
%>