1 -- File: DsgPrs_LengthPresentation.cdl
2 -- Created: Thu Jun 3 09:41:39 1993
3 -- Author: Jean-Louis FRENKEL
5 -- modified : Rob le 26-mars-96 rajout de methodes pour representation simple...
6 ---Copyright: Matra Datavision 1993
10 class LengthPresentation from DsgPrs
11 ---Purpose: Framework for displaying lengths.
12 -- The length displayed is indicated by line segments
13 -- and text alone or by a combination of line segment,
14 -- text and arrows at either or both of its ends.
16 Presentation from Prs3d,
20 ExtendedString from TCollection,
21 ArrowSide from DsgPrs,
26 Add( myclass; aPresentation: Presentation from Prs3d;
27 aDrawer: Drawer from Prs3d;
28 aText: ExtendedString from TCollection;
29 AttachmentPoint1: Pnt from gp;
30 AttachmentPoint2: Pnt from gp;
31 aDirection: Dir from gp;
32 OffsetPoint: Pnt from gp);
33 ---Purpose: Draws a line segment representing a length in the
34 -- display aPresentation.
35 -- This segment joins the points AttachmentPoint1 and
36 -- AttachmentPoint2, along the direction aDirection.
37 -- The text aText will be displayed at the offset point OffsetPoint.
38 -- The line and text attributes are specified by the
39 -- attribute manager aDrawer.
41 Add( myclass; aPresentation : Presentation from Prs3d;
42 aDrawer : Drawer from Prs3d;
43 aText : ExtendedString from TCollection;
44 AttachmentPoint1 : Pnt from gp;
45 AttachmentPoint2 : Pnt from gp;
46 aDirection : Dir from gp;
47 OffsetPoint : Pnt from gp;
48 ArrowSide : ArrowSide from DsgPrs );
49 ---Purpose: Draws a line segment representing a length in the
50 -- display aPresentation.
51 -- This segment joins the points AttachmentPoint1 and
52 -- AttachmentPoint2, along the direction aDirection.
53 -- The text aText will be displayed at the offset point
54 -- OffsetPoint. The value of the enumeration ArrowSide
55 -- controls whether arrows will be displayed at either or
56 -- both ends of the length.
57 -- The line, text and arrow attributes are specified by the
58 -- attribute manager aDrawer.
60 Add( myclass; aPresentation : Presentation from Prs3d;
61 aDrawer : Drawer from Prs3d;
62 aText : ExtendedString from TCollection;
63 AttachmentPoint1 : Pnt from gp;
64 AttachmentPoint2 : Pnt from gp;
65 PlaneOfFaces : Pln from gp;
66 aDirection : Dir from gp;
67 OffsetPoint : Pnt from gp;
68 ArrowSide : ArrowSide from DsgPrs );
69 ---Purpose: Draws a line segment representing a length in the
70 -- display aPresentation.
71 -- This segment joins the points AttachmentPoint1 and
72 -- AttachmentPoint2, along the direction aDirection.
73 -- The text aText will be displayed at the offset point
74 -- OffsetPoint. The value of the enumeration ArrowSide
75 -- controls whether arrows will be displayed at either or
76 -- both ends of the length.
77 -- The plane PlaneOfFaces is used if length is null.
78 -- The line, text and arrow attributes are specified by the
79 -- attribute manager aDrawer.
81 Add( myclass; aPresentation : Presentation from Prs3d;
82 aDrawer : Drawer from Prs3d;
83 aText : ExtendedString from TCollection;
84 SecondSurf : Surface from Geom;
85 AttachmentPoint1 : Pnt from gp;
86 AttachmentPoint2 : Pnt from gp;
87 aDirection : Dir from gp;
88 OffsetPoint : Pnt from gp;
89 ArrowSide : ArrowSide from DsgPrs );
90 ---Purpose: Draws a line segment representing a length in the
91 -- display aPresentation.
92 -- This segment joins the points AttachmentPoint1 and
93 -- AttachmentPoint2, along the direction
94 -- aDirection. AttachmentPoint2 lies on the curvilinear
95 -- faces SecondSurf. The text aText will be displayed at
96 -- the offset point OffsetPoint. The value of the
97 -- enumeration ArrowSide controls whether arrows will
98 -- be displayed at either or both ends of the length.
99 -- The line, text and arrow attributes are specified by the
100 -- attribute manager aDrawer.
104 aPresentation: Presentation from Prs3d;
105 aDrawer : Drawer from Prs3d;
108 ArrowSide : ArrowSide from DsgPrs);
109 ---Purpose: Draws a line segment representing a length in the
110 -- display aPresentation.
111 -- This segment joins the points AttachmentPoint1 and
112 -- AttachmentPoint2, along the direction aDirection.
113 -- The value of the enumeration ArrowSide controls
114 -- whether arrows will be displayed at either or both ends of the length.
115 -- The line and arrow attributes are specified by the attribute manager aDrawer.
117 end LengthPresentation;