[occt.git] / src / DsgPrs / DsgPrs_LengthPresentation.cdl

-- File:	DsgPrs_LengthPresentation.cdl
-- Created:	Thu Jun  3 09:41:39 1993
-- Author:	Jean-Louis FRENKEL
--		<jlf@stylox>
---Copyright:	 Matra Datavision 1993


class LengthPresentation from DsgPrs
    	---Purpose: Framework for displaying lengths.
    	-- The length displayed is indicated by line segments
    	-- and text alone or by a combination of line segment,
    	-- text and   arrows at either or both of its ends.
uses
    Presentation from Prs3d,
    Pnt from gp,
    Dir from gp,
    Drawer from Prs3d,
    ExtendedString from TCollection,
    ArrowSide from DsgPrs,
    
    Pln from gp,
    Surface from Geom
is  
    Add( myclass; aPresentation: Presentation from Prs3d;
    	    	  aDrawer: Drawer from Prs3d;
		  aText: ExtendedString from TCollection;
                  AttachmentPoint1: Pnt from gp;
		  AttachmentPoint2: Pnt from gp;
		  aDirection: Dir from gp;
		  OffsetPoint: Pnt from gp);
	---Purpose: Draws a line segment representing a length in the
    	-- display aPresentation.
    	-- This segment joins the points AttachmentPoint1 and
    	-- AttachmentPoint2, along the direction aDirection.
    	-- The text aText will be displayed at the offset point OffsetPoint.
    	-- The line and text attributes are specified by the
    	-- attribute manager aDrawer.
        
    Add( myclass; aPresentation    : Presentation   from Prs3d;
    	    	  aDrawer          : Drawer         from Prs3d;
		  aText            : ExtendedString from TCollection;
                  AttachmentPoint1 : Pnt            from gp;
		  AttachmentPoint2 : Pnt            from gp;
		  aDirection       : Dir            from gp;
		  OffsetPoint      : Pnt            from gp;
	    	  ArrowSide        : ArrowSide      from DsgPrs );
	---Purpose: Draws a line segment representing a length in the
    	-- display aPresentation.
    	-- This segment joins the points AttachmentPoint1 and
    	-- AttachmentPoint2, along the direction aDirection.
    	-- The text aText will be displayed at the offset point
    	-- OffsetPoint. The value of the enumeration ArrowSide
    	-- controls whether arrows will be displayed at either or
    	-- both ends of the length.
    	-- The line, text and arrow attributes are specified by the
    	-- attribute manager aDrawer.
		   
    Add( myclass; aPresentation    : Presentation   from Prs3d;
    	    	  aDrawer          : Drawer         from Prs3d;
		  aText            : ExtendedString from TCollection;
                  AttachmentPoint1 : Pnt            from gp;
		  AttachmentPoint2 : Pnt            from gp;
		  PlaneOfFaces     : Pln            from gp;
		  aDirection       : Dir            from gp;
		  OffsetPoint      : Pnt            from gp;
	    	  ArrowSide        : ArrowSide      from DsgPrs );
	---Purpose: Draws a line segment representing a length in the
    	-- display aPresentation.
    	-- This segment joins the points AttachmentPoint1 and
    	-- AttachmentPoint2, along the direction aDirection.
    	-- The text aText will be displayed at the offset point
    	-- OffsetPoint. The value of the enumeration ArrowSide
    	-- controls whether arrows will be displayed at either or
    	-- both ends of the length.
    	-- The plane PlaneOfFaces is used if length is null.
    	-- The line, text and arrow attributes are specified by the
    	-- attribute manager aDrawer.
		   
    Add( myclass; aPresentation    : Presentation   from Prs3d;
    	    	  aDrawer          : Drawer         from Prs3d;
		  aText            : ExtendedString from TCollection;
		  SecondSurf       : Surface        from Geom;
                  AttachmentPoint1 : Pnt            from gp;
		  AttachmentPoint2 : Pnt            from gp;
		  aDirection       : Dir            from gp;
		  OffsetPoint      : Pnt            from gp;
	    	  ArrowSide        : ArrowSide      from DsgPrs );
	---Purpose: Draws a line segment representing a length in the
    	-- display aPresentation.
    	-- This segment joins the points AttachmentPoint1 and
    	-- AttachmentPoint2, along the direction
    	-- aDirection.   AttachmentPoint2 lies on the curvilinear
    	-- faces SecondSurf. The text aText will be displayed at
    	-- the offset point OffsetPoint. The value of the
    	-- enumeration ArrowSide controls whether arrows will
    	-- be displayed at either or both ends of the length.
    	-- The line, text and arrow attributes are specified by the
    	-- attribute manager aDrawer.


    Add(myclass;
    	aPresentation: Presentation from Prs3d;
    	aDrawer      : Drawer from Prs3d;
	Pt1          : Pnt from gp;
	Pt2          : Pnt from gp;
	ArrowSide    : ArrowSide from DsgPrs);
	---Purpose: Draws a line segment representing a length in the
    	-- display aPresentation.
    	-- This segment joins the points AttachmentPoint1 and
    	-- AttachmentPoint2, along the direction aDirection.
    	-- The value of the enumeration ArrowSide controls
    	-- whether arrows will be displayed at either or both ends of the length.
    	-- The line and arrow attributes are specified by the attribute manager aDrawer.

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