7fd59977 |
1 | -- File: XmlMNaming_Shape1.cdl |
2 | -- Created: Sep 14 2001 |
3 | -- Author: Alexander GRIGORIEV |
4 | ---Copyright: Open Cascade 2001 |
5 | |
6 | class Shape1 from XmlMNaming inherits Storable |
7 | |
8 | ---Purpose: The XmlMNaming_Shape1 is the Persistent view of a TopoDS_Shape. |
9 | -- |
10 | -- a Shape1 contains : |
11 | -- - a reference to a TShape |
12 | -- - a reference to Location |
13 | -- - an Orientation. |
14 | |
15 | uses |
16 | Shape from TopoDS, |
17 | Orientation from TopAbs, |
18 | Document from XmlObjMgt, |
19 | Element from XmlObjMgt, |
20 | DOMString from XmlObjMgt |
21 | |
22 | is |
23 | Create(Doc : out Document from XmlObjMgt) returns Shape1 from XmlMNaming; |
24 | ---Level: Internal |
25 | |
26 | Create(E : Element from XmlObjMgt) returns Shape1 from XmlMNaming; |
27 | ---Level: Internal |
28 | |
29 | Element (me) returns Element from XmlObjMgt; |
30 | ---Purpose: return myElement |
31 | ---C++: return const & |
32 | |
33 | Element (me:in out) returns Element from XmlObjMgt; |
34 | ---Purpose: return myElement |
35 | ---C++: return & |
36 | |
37 | TShapeId(me) returns Integer from Standard |
38 | ---Level: Internal |
39 | is static; |
40 | |
41 | LocId(me) returns Integer from Standard |
42 | ---Level: Internal |
43 | is static; |
44 | |
45 | Orientation(me) returns Orientation from TopAbs |
46 | ---Level: Internal |
47 | is static; |
48 | |
49 | SetShape (me: in out; ID, LocID : Integer from Standard; |
50 | Orient : Orientation from TopAbs) |
51 | ---Level: Internal |
52 | is static; |
53 | |
54 | |
55 | SetVertex (me: in out; theVertex : Shape from TopoDS) |
56 | ---Level: Internal |
57 | is static; |
58 | |
59 | fields |
60 | myElement : Element from XmlObjMgt; |
61 | myTShapeID : Integer from Standard; |
62 | myLocID : Integer from Standard; |
63 | myOrientation : Orientation from TopAbs; |
64 | |
65 | end Shape1; |