4.51.2.4.24. ogGetBPP()	Table of Contents	4.51.2.4.26. ogGetDataState()

  function ogGetBytesPerPix:uInt32;

Returns the bytes per pixel for the surface. Currently this can be 0, 1, 2, 3, or 4. A graphics buffer of 0 bytes per pixel is considered not created.

• OG_MAC_PIXFMT_16BPP constant
• OG_PIXFMT_8BPP constant
• OG_PIXFMT_15BPP constant
• OG_PIXFMT_16BPP constant
• OG_PIXFMT_24BPP constant
• OG_PIXFMT_32BPP constant
• ogSurface.ogCreate()
• ogSurface.ogGetBPP()
• ogSurface.ogGetPixFmt()

{ogGetBPP.pas}

uses
  ObjGfx40;

type
  New_ogSurface = object(ogSurface)
    procedure printStatus;
  end;

procedure New_ogSurface.printStatus;
begin
  writeln;
  writeln('DataState:     ',OG_DATA_STATE_STR[ogGetDataState]);
  writeln('MaxX:          ',ogGetMaxX);
  writeln('MaxY:          ',ogGetMaxY);
  writeln('BPP:           ',ogGetBPP);
  writeln('Bytes Per Pix: ',ogGetBytesPerPix);
  if (ogGetDataState<>ogNONE) then
    writeln('Surface is:  ',ogGetMaxX+1,'x',ogGetMaxY+1,'x',ogGetBPP,'bpp')
  else
    writeln('Surface is:  not created');
  writeln;
end;

var
  buf:^New_ogSurface;

begin
  new(buf, ogInit);

  writeln('Status before ogCreate()');
  buf^.printStatus;

  if not buf^.ogCreate(2048, 2048, OG_PIXFMT_32BPP) then
    begin
      writeln('Error allocating surface');
      halt
    end;
  writeln('Status after ogCreate()');
  buf^.PrintStatus;

  dispose(buf, ogDone);
end.

4.51.2.4.24. ogGetBPP()	Table of Contents	4.51.2.4.26. ogGetDataState()