arc

type arc = object(vertex_source)

  m_x: Double;

  m_y: Double;

  m_rx: Double;

  m_ry: Double;

  m_angle: Double;

  m_start: Double;

  m_end: Double;

  m_scale: Double;

  m_da: Double;

  m_ccw: Boolean;

  m_initialized: Boolean;

  m_path_cmd: unsigned;

  constructor Construct();

  procedure init();

  procedure approximation_scale_();

  function _approximation_scale;

  procedure rewind(); virtual;

  function vertex(); virtual;

  procedure normalize();

end;

arc

vertex_source

TObject