1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
|
-- File: DrawableShape.cdl
-- Created: Thu Jul 4 14:40:35 1991
-- Author: Christophe MARION
-- <cma@phobox>
---Copyright: Matra Datavision 1991, 1992
class DrawableShape from DBRep inherits Drawable3D from Draw
---Purpose:
uses
Shape from TopoDS,
Color from Draw,
Display from Draw,
Trsf from gp,
ListOfEdge from DBRep,
ListOfFace from DBRep,
ListOfHideData from DBRep,
Interpretor from Draw,
Triangulation from Poly,
OStream
raises
DomainError
is
Create (C: Shape from TopoDS;
FreeCol : Color from Draw; -- color for free edges
ConnCol : Color from Draw; -- color for shared edges
EdgeCol : Color from Draw; -- color for other edges
IsosCol : Color from Draw; -- color for Isos
size : Real; -- size for infinite isos
nbisos : Integer; -- # of isos on each face
discret : Integer) -- # of points on curves
returns mutable DrawableShape from DBRep
raises DomainError;
Set (me : mutable; C: Shape from TopoDS)
is static;
ChangeNbIsos (me : mutable ; NbIsos : Integer from Standard)
---Purpose: Changes the number of isoparametric curves in a shape.
is static ;
NbIsos (me)
---Purpose: Returns the number of isoparametric curves in a shape.
returns Integer from Standard
is static ;
ChangeDiscret (me : mutable ; Discret : Integer from Standard)
---Purpose: Changes the number of isoparametric curves in a shape.
is static ;
Discret (me)
---Purpose: Returns the discretisation value of curve
returns Integer from Standard
is static ;
Shape(me) returns Shape from TopoDS
---Purpose: Return const &
is static;
DisplayOrientation(me : mutable; D : Boolean)
---Purpose: When True the orientations of the edges and free
-- vertices are displayed.
is static;
DisplayTriangulation(me : mutable; D : Boolean)
---Purpose: When True the triangulations of the faces
-- are displayed even if there is a surface.
is static;
DisplayPolygons(me : mutable; D : Boolean)
---Purpose: When True the polygons of the edges
-- are displayed even if there is a geometric curve.
is static;
DisplayHLR(me : mutable; withHLR : Boolean;
withRg1 : Boolean;
withRgN : Boolean;
withHid : Boolean;
ang : Real);
---Purpose: Performs Hidden lines.
DisplayTriangulation(me)
---Purpose:
returns Boolean
is static;
DisplayPolygons(me)
---Purpose:
returns Boolean
is static;
GetDisplayHLR(me; withHLR : out Boolean;
withRg1 : out Boolean;
withRgN : out Boolean;
withHid : out Boolean;
ang : out Real);
DrawOn(me; dis : in out Display from Draw);
Display(me; T : Triangulation from Poly;
tr : Trsf from gp;
dis : in out Display from Draw)
---Purpose:
is static private;
DisplayHiddenLines(me : mutable; dis : in out Display from Draw);
Copy(me) returns mutable Drawable3D from Draw
---Purpose: For variable copy.
is redefined;
Dump(me; S : in out OStream)
---Purpose: For variable dump.
is redefined;
Whatis(me; I : in out Interpretor from Draw)
---Purpose: For variable whatis command.
is redefined;
LastPick(myclass; S : in out Shape from TopoDS; u,v : in out Real);
---Purpose: Returns the subshape touched by the last pick.
-- u,v are the parameters of the closest point.
fields
myShape : Shape from TopoDS;
myEdges : ListOfEdge from DBRep;
myFaces : ListOfFace from DBRep;
myHidData : ListOfHideData from DBRep;
mySize : Real from Standard;
myDiscret : Integer from Standard;
myFreeCol : Color from Draw;
myConnCol : Color from Draw;
myEdgeCol : Color from Draw;
myIsosCol : Color from Draw;
myNbIsos : Integer from Standard;
myDispOr : Boolean from Standard;
mytriangulations : Boolean from Standard;
mypolygons : Boolean from Standard;
myHLR : Boolean from Standard;
myRg1 : Boolean from Standard;
myRgN : Boolean from Standard;
myHid : Boolean from Standard;
myAng : Real from Standard;
end DrawableShape;
|
