Previous: 4.51.2.4.4. ogBSpline() To the Table of Contents Next: 4.51.2.4.6. ogClear()
4.51.2.4.4. ogBSpline() Table of Contents 4.51.2.4.6. ogClear()

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



Previous: 4.51.2.4.4. ogBSpline() To the Table of Contents Next: 4.51.2.4.6. ogClear()
4.51.2.4.4. ogBSpline() Table of Contents 4.51.2.4.6. ogClear()

- 4.51.2.4.5. -