[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
Circle procedure
DECLARATION: Circle(X,Y : Integer; Radius : Word);
PURPOSE: Draws a circle using (X,Y) as the center point
UNIT: Graph
REMARKS: The circle will be drawn in the current color set
SetColor. Each graphics contains an aspect ratio that
is used by Circle, Arc, and PieSlice to make circles.
RESTRICTIONS: Must be in graphics mode.
EXAMPLE: Uses Graph;
Var
Gd, Gm : Integer;
Radius : Integer;
Begin
Gd := Detect;
InitGraph(Gd, Gm, '');
If(GraphResult <> grOK) Then
Halt(1);
For Radius := 1 to 5 do
Circle(100,100,Radius*10);
ReadLn;
CloseGraph;
End.
See Also:
Arc
Ellipse
GetArcCoords
GetAspectRatio
PieSlice
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson