7fd59977 |
1 | -- File: DsgPrs_PerpenPresentation.cdl |
2 | -- Created: Tue Nov 28 12:13:52 1995 |
3 | -- Author: Jean-Pierre COMBE |
4 | -- <jpi@pdalon> |
5 | ---Copyright: Matra Datavision 1995 |
6 | |
7 | class PerpenPresentation from DsgPrs |
8 | |
9 | ---Purpose: A framework to define display of perpendicular |
10 | -- constraints between shapes. |
11 | uses |
12 | Presentation from Prs3d, |
13 | Pnt from gp, |
14 | Dir from gp, |
15 | Drawer from Prs3d, |
16 | ExtendedString from TCollection |
17 | |
18 | is |
19 | Add( myclass; aPresentation: Presentation from Prs3d; |
20 | aDrawer: Drawer from Prs3d; |
21 | pAx1: Pnt from gp; |
22 | pAx2: Pnt from gp; |
23 | pnt1: Pnt from gp; |
24 | pnt2: Pnt from gp; |
25 | OffsetPoint: Pnt from gp; |
26 | intOut1: Boolean from Standard; |
27 | intOut2: Boolean from Standard); |
28 | ---Purpose: Defines the display of elements showing |
29 | -- perpendicular constraints between shapes. |
30 | -- These include the two axis points pAx1 and pAx2, |
31 | -- the two points pnt1 and pnt2, the offset point |
32 | -- OffsetPoint and the two Booleans intOut1} and intOut2{. |
33 | -- These arguments are added to the presentation |
34 | -- object aPresentation. Their display attributes are |
35 | -- defined by the attribute manager aDrawer. |
36 | |
37 | |
38 | end PerpenPresentation; |