TfpgGDICanvas

type TfpgGDICanvas = class(TfpgCanvasBase)

protected

  procedure DoSetFontRes(); override;

  procedure DoSetTextColor(); override;

  procedure DoSetColor(); override;

  procedure DoSetLineStyle(); override;

  procedure DoGetWinRect(); override;

  procedure DoFillRectangle(); override;

  procedure DoXORFillRectangle(); override;

  procedure DoFillTriangle(); override;

  procedure DoDrawRectangle(); override;

  procedure DoDrawLine(); override;

  procedure DoDrawImagePart(); override;

  procedure DoDrawString(); override;

  procedure DoSetClipRect(); override;

  function DoGetClipRect; override;

  procedure DoAddClipRect(); override;

  procedure DoClearClipRect; override;

  procedure DoBeginDraw(); override;

  procedure DoPutBufferToScreen(); override;

  procedure DoEndDraw; override;

  function GetPixel(); override;

  procedure SetPixel(); override;

  procedure DoDrawArc(); override;

  procedure DoFillArc(); override;

  procedure DoDrawPolygon(); override;

  property DCHandle: TfpgDCHandle; [r]

public

  constructor Create; override;

  destructor Destroy; override;

end;

TfpgGDICanvas

TfpgCanvasBase

TObject