- 4.51.2.4.5. -
Table of Contents
4. Standard Units
4.51. ObjGfx40 - ObjectGraphics 4.0 Unit
4.51.2. ObjGfx40 Unit Object Types
4.51.2.4. ogSurface object
4.51.2.4.5. ogCircle()
4.51.2.4.5. ogCircle()
Targets: MS-DOS, Win32 console
ObjGfx40 Unit
Draws a circle using (xCenter, yCcenter) as the center point.
Declaration:
procedure ogCircle(xCenter, yCenter:int32; radius, colour:uInt32);
Remarks:
Draws a circle at (xCenter, yCcenter) with radius Radius in colour Colour.
See also:
Sample code:
{ogCircle.pas}
uses
ObjGfx40, CRT;
begin
randomize;
if not screen^.ogCreate(640, 480, OG_PIXFMT_8BPP) then
begin
writeln('Error setting video mode');
halt
end;
repeat
with screen^ do
ogCircle(random(ogGetMaxX), random(ogGetMaxY),
random(ogGetMaxX), random(255));
until keyPressed;
while keyPressed do readKey;
end.
- 4.51.2.4.5. -
