7fd59977 |
1 | -- File: XCAFPrs_AISObject.cdl |
2 | -- Created: Fri Aug 11 16:37:11 2000 |
3 | -- Author: Andrey BETENEV |
4 | -- <abv@doomox.nnov.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 2000 |
6 | |
7 | |
8 | class AISObject from XCAFPrs inherits Shape from AIS |
9 | |
10 | ---Purpose: Implements AIS_InteractiveObject functionality |
11 | -- for shape in DECAF document |
12 | |
13 | uses |
14 | Shape from TopoDS, |
15 | PresentationManager3d from PrsMgr, |
16 | Presentation from Prs3d, |
17 | Label from TDF, |
18 | Style from XCAFPrs |
19 | |
20 | is |
21 | |
22 | Create (lab: Label from TDF); |
23 | ---Purpose: Creates an object to visualise the shape label |
24 | |
25 | AddStyledItem (me: mutable; style: Style from XCAFPrs; |
26 | shape: Shape from TopoDS; |
27 | aPresentationManager : PresentationManager3d from PrsMgr; |
28 | aPresentation : mutable Presentation from Prs3d; |
29 | aMode : Integer from Standard = 0) |
30 | is private; |
31 | |
32 | Compute (me : mutable; |
33 | aPresentationManager : PresentationManager3d from PrsMgr; |
34 | aPresentation : mutable Presentation from Prs3d; |
35 | aMode : Integer from Standard = 0) |
36 | is redefined virtual private; |
37 | ---Purpose: Redefined method to compute presentation |
38 | |
39 | fields |
40 | myLabel : Label from TDF; |
41 | |
42 | end AISObject; |