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