Previous: 4.51.2.3.14. saveToOffset() To the Table of Contents Next: 4.51.2.4.1. ogAlias()
4.51.2.3.14. saveToOffset() Table of Contents 4.51.2.4.1. ogAlias()

- 4.51.2.4. -
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. ogSurface object

Targets: MS-DOS, Win32 console


ObjGfx40 Unit

type
  ogSurface = object
   public
    function    ogAlias(var srcObject:ogSurface; x1, y1, x2, y2:uInt32):boolean; virtual;
    procedure   ogArc(xCenter, yCcenter:int32; radius, sAngle, eAngle, colour:uInt32);
    function    ogAvail:boolean; virtual;
    procedure   ogBSpline(numPoints: uInt32; var points:array of ogPoint2d; segments, colour:uInt32);
    procedure   ogCircle(xCenter, yCenter:int32; radius, colour:uInt32);
    procedure   ogClear(colour:uInt32); virtual;
    function    ogClone(var srcObject:ogSurface):boolean; virtual;
    procedure   ogCopy(var srcObject:ogSurface);
    procedure   ogCopyLineTo(dX, dY:uInt32; from:pointer; size:uInt32); virtual;
    procedure   ogCopyLineFrom(sX, sY:uInt32; to:pointer; size:uInt32); virtual;
    procedure   ogCopyBuf(dX1, dY1:int32; var srcObject:ogSurface; sX1, sY1, sX2, sY2:int32);
    procedure   ogCopyPal(var srcObject:ogSurface); virtual;
    function    ogCreate(xRes, yRes: uInt32; pixFormat:ogPixelFmt):boolean; virtual;
    procedure   ogCubicBezierCurve(x1, y1, x2, y2, x3, y3, x4, y4:int32; segments:uInt32; colour:uInt32);
    procedure   ogCurve(x1, y1, x2, y2, x3, y3:int32; segments:uInt32; colour:uInt32);
    destructor  ogDone; virtual;    
    procedure   ogFillCircle(xCenter, yCenter:int32; radius, colour:uInt32);
    procedure   ogFillGouraudPolygon(numPoints:uInt32; var polyPoints:array of ogPoint2d; var colours:array of ogRGBA8);
    procedure   ogFillPolygon(numPoints:uInt32; var polyPoints:array of ogPoint2d; colour:uInt32);
    procedure   ogFillRect(x1, y1, x2, y2:int32; colour:uInt32);
    procedure   ogFillTriangle(x1, y1, x2, y2, x3, y3:int32; colour:uInt32);
    function    ogGetAlpha:uInt32;
    function    ogGetAlphaMasker:uInt32;
    function    ogGetBPP:uInt32;
    function    ogGetBytesPerPix:uInt32;
    function    ogGetDataState:ogDataState;
    function    ogGetLastError:ogErrorCode;
    function    ogGetMaxX:uInt32;
    function    ogGetMaxY:uInt32;
    procedure   ogGetPal(var pal:ogPal);
    function    ogGetPixel(x, y:int32):uInt32; virtual;
    procedure   ogGetPixFmt(var pixFmt:ogPixelFmt);
    function    ogGetPtr(x, y:uInt32):pointer; virtual;
    function    ogGetTransparentColor:uInt32;
    procedure   ogHFlip;
    procedure   ogHLine(x1, x2, y:int32; colour:uInt32); virtual;
    constructor ogInit;
    function    ogIsAntiAliasing:boolean;
    function    ogIsBlending:boolean;
    procedure   ogLine(x1, y1, x2, y2:int32;colour:uInt32);
    function    ogLoadPal(const palfile:string):boolean; virtual;
    procedure   ogPolygon(numPoints:uInt32; var polyPoints:array of ogPoint2d; colour:uInt32);
    procedure   ogRect(x1, y1, x2, y2:int32; colour:uInt32);
    function    ogRGB(red, green, blue:uInt8):uInt32;
    function    ogRGBA(red, green, blue, alpha:uInt8):uInt32;    
    function    ogSavePal(const palFile:string):boolean;
    procedure   ogScale(var srcObject:ogSurface);
    procedure   ogScaleBuf(dX1, dY1, dX2, dY2:int32; var srcObject:ogSurface; sX1, sY1, sX2, sY2:Int32);
    function    ogSetAlpha(alpha:uInt32):uInt32;
    function    ogSetAntiAliasing(antiAlias:boolean):boolean;
    function    ogSetBlending(blending:uInt32):boolean;
    function    ogSetLastError(latestError:ogErrorCode):ogErrorCode; virtual;
    procedure   ogSetPal(var newPalette:ogPal); virtual;
    procedure   ogSetPixel(x, y:int32; colour:uInt32); virtual;
    procedure   ogSetPixelRGBA(x, y:int32; red, green, blue, alpha:uInt8); virtual;    
    procedure   ogSetRGBPalette(colour, red, green, blue:uInt8); virtual;
    procedure   ogSetRGBAPalette(colour, red, green, blue, alpha:uInt8); virtual;    
    function    ogSetTransparentColor(colour:uInt32):uInt32;
    procedure   ogSpline(numPoints: uInt32; varpoints: array of ogPoint2d; segments, colour:uInt32);
    procedure   ogTriangle(x1, y1, x2, y2, x3, y3:int32; colour:uInt32);
    procedure   ogUnpackRGB(colour:uInt32; var red, green, blue:uInt8);
    procedure   ogUnpackRGBA(colour:uInt32; var red, green, blue, alpha:uInt8);
    procedure   ogVFlip;
    procedure   ogVLine(x, y1, y2:int32; colour:uInt32); virtual;
  end;



Previous: 4.51.2.3.14. saveToOffset() To the Table of Contents Next: 4.51.2.4.1. ogAlias()
4.51.2.3.14. saveToOffset() Table of Contents 4.51.2.4.1. ogAlias()

- 4.51.2.4. -