| Class Entity_List (unit DXF_structs) |
TObject
| Constructors |
constructor create(l_name:string);| Functions |
function add_entity_to_list(entity:DXF_Entity) : boolean;
function closest_vertex_square_distance_2D(p:Point3D; var cl:DXF_Entity) : double;
function count_lines : integer;
function count_points : integer;
function count_polys_closed : integer;
function count_polys_open : integer;
destructor destroy;
procedure draw_primitives(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
procedure draw_vertices(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
function find_bounding_object(p:Point3D) : DXF_Entity;
procedure max_min_extents(var emax,emin:Point3D);
function num_entities : integer;
function remove_entity(ent:DXF_Entity) : boolean;
procedure setcolour(col:integer);
function add_at_end(entity:DXF_Entity) : boolean;
function insert(entity:DXF_Entity) : boolean;| Properties |
property name : string| Events |
| Variables |
entities : TList;
Kludge_layer : DXF_Layer;
list_name : string;
parent_layer : DXF_Layer;
sorted : boolean;| Constructors |
constructor create(l_name:string);///////////////////////////////////////////////////////////////////////////// Entity_List class implementation /////////////////////////////////////////////////////////////////////////////
| Functions |
function add_entity_to_list(entity:DXF_Entity) : boolean;
function closest_vertex_square_distance_2D(p:Point3D; var cl:DXF_Entity) : double;
function count_lines : integer;
function count_points : integer;
function count_polys_closed : integer;
function count_polys_open : integer;
destructor destroy;
procedure draw_primitives(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
procedure draw_vertices(acanvas:TCanvas; map_fn:coord_convert; OCS:pM);
function find_bounding_object(p:Point3D) : DXF_Entity;
procedure max_min_extents(var emax,emin:Point3D);
function num_entities : integer;
function remove_entity(ent:DXF_Entity) : boolean;
procedure setcolour(col:integer);
function add_at_end(entity:DXF_Entity) : boolean;
function insert(entity:DXF_Entity) : boolean;| Properties |
property name : string| Events |
| Variables |
entities : TList;see selection.save...
Kludge_layer : DXF_Layer;
list_name : string;
parent_layer : DXF_Layer;
sorted : boolean;