blob: 6a54ff638144a2d1073d35f83413a0e2ff28e290 (
plain)
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
|
-- File: DsgPrs_EqualDistancePresentation.cdl
-- Created: Tue Jan 27 16:59:36 1998
-- Author: Julia GERASIMOVA
-- <jgv@velox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class EqualDistancePresentation from DsgPrs
---Purpose: A framework to display equal distances between shapes and a given plane.
-- The distance is the length of a projection from the shape to the plane.
-- These distances are used to compare two shapes by this vector alone.
uses
Presentation from Prs3d,
Drawer from Prs3d,
Pnt from gp,
Dir from gp,
Plane from Geom,
ArrowSide from DsgPrs,
Circ from gp
is
Add( myclass; aPresentation : Presentation from Prs3d;
aDrawer : Drawer from Prs3d;
Point1 : Pnt from gp;
Point2 : Pnt from gp;
Point3 : Pnt from gp;
Point4 : Pnt from gp;
Plane : Plane from Geom );
---Purpose: Adds the points Point1, Point2, Point3 Point4, and the
-- plane Plane to the presentation object aPresentation.
-- The display attributes of these elements is defined by the attribute manager aDrawer.
-- The distance is the length of a projection from the shape to the plane.
-- These distances are used to compare two shapes by this vector alone.
AddInterval( myclass; aPresentation : Presentation from Prs3d;
aDrawer : Drawer from Prs3d;
aPoint1 : Pnt from gp;
aPoint2 : Pnt from gp;
aDir : Dir from gp;
aPosition : Pnt from gp;
anArrowSide : ArrowSide from DsgPrs;
anExtremePnt1 : out Pnt from gp;
anExtremePnt2 : out Pnt from gp);
---Purpose: is used for presentation of interval between
-- two lines or two points or between a line and a point.
AddIntervalBetweenTwoArcs( myclass;aPresentation : Presentation from Prs3d;
aDrawer : Drawer from Prs3d;
aCircle1 : Circ from gp;
aCircle2 : Circ from gp;
aPoint1 : Pnt from gp;
aPoint2 : Pnt from gp;
aPoint3 : Pnt from gp;
aPoint4 : Pnt from gp;
anArrowSide : ArrowSide from DsgPrs);
---Purpose:is used for presentation of interval between two arcs.
-- One of arcs can have a zero radius.
end EqualDistancePresentation;
|
