vcgen_bspline

type vcgen_bspline = object(vertex_source)

  m_src_vertices: pod_deque;

  m_spline_x: bspline;

  m_spline_y: bspline;

  m_interpolation_step: Double;

  m_closed: unsigned;

  m_status: status_e;

  m_src_vertex: unsigned;

  m_cur_abscissa: Double;

  m_max_abscissa: Double;

  constructor Construct;

  destructor Destruct; virtual;

  procedure interpolation_step_();

  function _interpolation_step;

  procedure remove_all; virtual;

  procedure add_vertex(); virtual;

  procedure rewind(); virtual;

  function vertex(); virtual;

end;

vcgen_bspline

vertex_source

TObject