Class Circle_ (unit DXF_structs) |
Inherits from
Point_
///////////////////////////////////////////////////////////////////////////// Circle Definition /////////////////////////////////////////////////////////////////////////////
constructor create(OCSaxis,p_1:Point3D; radius_:double; col:integer);
- ///////////////////////////////////////////////////////////////////////////// Circle /////////////////////////////////////////////////////////////////////////////
constructor create_from_polyline(ent1:DXF_Entity);
function details : string;
bug in Ellipse routine causes crash if extents are too small
procedure Draw(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
function is_point_inside_object2D(p:Point3D) : boolean;
procedure max_min_extents(var emax,emin:Point3D);
procedure write_to_DXF(var IO:textfile; layer:string);
radius : double;
constructor create(OCSaxis,p_1:Point3D; radius_:double; col:integer);
///////////////////////////////////////////////////////////////////////////// Circle /////////////////////////////////////////////////////////////////////////////
constructor create_from_polyline(ent1:DXF_Entity);
function details : string;
bug in Ellipse routine causes crash if extents are too small
procedure Draw(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
function is_point_inside_object2D(p:Point3D) : boolean;
procedure max_min_extents(var emax,emin:Point3D);
procedure write_to_DXF(var IO:textfile; layer:string);
radius : double;