Previous: 4.51.2.4.1. ogAlias() To the Table of Contents Next: 4.51.2.4.3. ogAvail()
4.51.2.4.1. ogAlias() Table of Contents 4.51.2.4.3. ogAvail()

- 4.51.2.4.2. -
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.2. ogArc()


4.51.2.4.2. ogArc()

Targets: MS-DOS, Win32 console


ObjGfx40 Unit

Draws a circular arc.

Declaration:
  procedure ogArc(xCenter,yCenter:int32; radius, sAngle, eAngle, colour:uInt32);
Remarks:

The arc goes from sAngle (start angle) to eAngle) with radius Radius, using (xCenter, yCenter) as the center point, and drawing in colour colour.

See Also: Sample code:
{ogArc.pas}

uses
  ObjGfx40, CRT;

var 
  radius:uInt32;

begin
  if not screen^.ogCreate(640, 480, OG_PIXFMT_8BPP) then
    begin
      writeln('Cannot init 640x480x8bpp');
      halt
     end;

  for Radius := 1 to 8 do
    begin
      screen^.ogArc(100, 100, radius*10,0, 90, radius*15);
      screen^.ogArc(100, 100, radius*10, 180, 270, 249-(radius-1)*16);
    end;
  readkey;
end.



Previous: 4.51.2.4.1. ogAlias() To the Table of Contents Next: 4.51.2.4.3. ogAvail()
4.51.2.4.1. ogAlias() Table of Contents 4.51.2.4.3. ogAvail()

- 4.51.2.4.2. -