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
149
150
151
152
153
|
-- File: Select3D_SensitiveSegment.cdl
-- Created: Tue Jan 24 13:49:15 1995
-- Author: Mister rmi
-- <rmi@photon>
---Copyright: Matra Datavision 1995
class SensitiveSegment from Select3D
inherits SensitiveEntity from Select3D
---Purpose: A framework to define sensitive zones along a segment
-- One gives the 3D start and end point;
-- the maximum number of 2D boxes given
-- by this entity may be set by the user
-- if the projected segment is
-- vertical or horizontal, one needs only 1 box.
-- for a pi/4 angle -> MaxNumber 2D boxes
uses
Pnt from gp,
Pnt2d from gp,
Projector from Select3D,
Lin from gp,
EntityOwner from SelectBasics,
ListOfBox2d from SelectBasics,
Array1OfPnt2d from TColgp,
Box2d from Bnd,
Location from TopLoc,
Pnt from Select3D,
Pnt2d from Select3D
is
Create (OwnerId : EntityOwner from SelectBasics;
FirstP,LastP : Pnt from gp;
MaxRect : Integer = 1)
returns mutable SensitiveSegment;
---Purpose: Constructs the sensitive segment object defined by
-- the owner OwnerId, the points FirstP, LastP and the
-- maximum number of sensitive bounding boxes MaxRect.
Set (me:mutable; MaxRect : Integer) is static;
---Purpose: Sets the maximum number of sensitive rectangles MaxRect.
---C++: inline
StartPoint (me : mutable ; aPt : Pnt from gp) is static;
---Level: Public
---Purpose: changes the start Point of the Segment;
---C++: inline
EndPoint (me : mutable ; aPt : Pnt from gp) is static;
---Level: Public
---Purpose: changes the end point of the segment
---C++: inline
StartPoint (me) returns Pnt from gp is static;
---Level: Public
---Purpose: gives the 3D start Point of the Segment
---C++: inline
EndPoint(me) returns Pnt from gp is static;
---Level: Public
---Purpose: gives the 3D End Point of the Segment
---C++: inline
StartPoint2d (me) returns Pnt2d from gp is static;
---Level: Public
---Purpose: gives the 3D start Point of the Segment
---C++: inline
EndPoint2d(me) returns Pnt2d from gp is static;
---Level: Public
---Purpose: gives the 3D End Point of the Segment
---C++: inline
Project (me:mutable;aProjector : Projector from Select3D)
is redefined virtual;
---Level: Public
---Purpose: projection of the sensitive primitive in order to
-- get 2D boxes for the Sort Algorithm
Areas (me:mutable ; boxes : in out ListOfBox2d from SelectBasics)
is redefined static;
---Level: Public
---Purpose: gives the 2D boxes which represent the segment in the
-- selection process...
GetConnected(me:mutable;aLocation: Location from TopLoc)
returns SensitiveEntity from Select3D is redefined static;
Matches(me :mutable;
X,Y : Real from Standard;
aTol: Real from Standard;
DMin: out Real from Standard)
returns Boolean
is redefined static;
---Level: Public
---Purpose: projection of the sensitive primitive in order to
-- get 2D boxes for the Sort Algorithm
Matches (me :mutable;
XMin,YMin,XMax,YMax : Real from Standard;
aTol: Real from Standard)
returns Boolean
is static;
Matches (me :mutable;
Polyline:Array1OfPnt2d from TColgp;
aBox:Box2d from Bnd;
aTol: Real from Standard)
returns Boolean
is redefined virtual;
---Level: Public
ComputeDepth(me;EyeLine: Lin from gp)
returns Real from Standard is redefined static;
MaxBoxes(me) returns Integer is redefined static;
---Level: Public
---Purpose:returns <mymaxrect>
---C++: inline
Dump(me; S: in out OStream;FullDump : Boolean from Standard = Standard_True) is redefined virtual;
fields
mymaxrect : Integer;
mystart : Pnt from Select3D;
myend : Pnt from Select3D;
myprojstart : Pnt2d from Select3D; -- computed at convert time
myprojend : Pnt2d from Select3D; -- computed at convert time
end SensitiveSegment;
|