trans_single_path

type trans_single_path = object(trans_affine)

  m_src_vertices: vertex_sequence;

  m_base_length: Double;

  m_kindex: Double;

  m_status: status_e;

  m_preserve_x_scale: Boolean;

  constructor Construct;

  destructor Destruct;

  procedure base_length_();

  function _base_length;

  procedure preserve_x_scale_();

  function _preserve_x_scale;

  procedure reset; virtual;

  procedure move_to();

  procedure line_to();

  procedure finalize_path;

  procedure add_path();

  function total_length;

end;

trans_single_path

trans_affine

TObject