TEarthCanvas

type TEarthCanvas = class(TCustomEarthCanvas)

protected

  procedure SetDefFont();

  procedure SetDefTitleFont();

public

  constructor Create(); virtual;

  destructor Destroy; override;

  procedure SizeBMP();

  function ClipPoly();

  procedure DrawClippedPoly();

  procedure DrawVectorMatrixLine();

  function ResizeProjection();

  function FontRenderHeight();

  function EarthUnitsFrom();

  function HeightUnitsFrom();

  function ScaleUnitsToDevice();

  procedure Assign(); override;

  function Clone;

  procedure RenderChainStore();

  procedure RenderTextureMap();

  procedure RenderTextureTriangle();

  function RenderShadow();

  function RenderDIBShadow();

  procedure RenderPolygon();

  procedure RenderPolyLine();

  procedure RenderCircle();

  procedure RenderLine();

  procedure RenderGreatCircleLine();

  procedure RenderMER();

  procedure RenderProjectedMER();

  procedure RenderBox();

  procedure RenderBoxLL();

  property DefPen: TEarthPen; [r]

  property DefBrush: TEarthBrush; [r]

  property DefFont: TEarthFont; [rw]

  property DefTitleFont: TEarthFont; [rw]

  property Earth: TCustomEarth; [rw]

  property Projection: TEarthProjection; [r]

end;

TEarthCanvas

TCustomEarthCanvas

TAgxExCanvas

TObject