TcyDMMCanvas

type TcyDMMCanvas = class(Tcanvas)

public

  constructor Create;

  destructor Destroy; override;

  function PxToDmm_X();

  function PxToDmm_Y();

  function DmmToPx_X();

  function DmmToPx_Y();

  function DmmToPx_Point();

  function DmmToPx_Rect();

  procedure DMMArc();

  procedure DMMBrushCopy();

  procedure DMMChord();

  procedure DMMCopyRect();

  procedure DMMDraw();

  procedure DMMDrawFocusRect();

  procedure DMMEllipse();

  procedure DMMFillRect();

  procedure DMMFloodFill();

  procedure DMMFrameRect();

  procedure DMMLineTo();

  procedure DMMMoveTo();

  procedure DMMPie();

  procedure DMMPolygon();

  procedure DMMPolyline();

  procedure DMMPolyBezier();

  procedure DMMPolyBezierTo();

  procedure DMMRectangle();

  procedure DMMRoundRect();

  procedure DMMStretchDraw();

  function DMMTextExtent();

  function DMMTextHeight();

  procedure DMMTextOut();

  procedure DMMTextRect();

  function DMMTextWidth();

  property DMMFontHeight: Integer; [rw]

  property DMMPixels []: TColor; [rw]

end;

TcyDMMCanvas

TObject