7fd59977 |
1 | -- File: XCAFDoc_Material.cdl |
2 | -- Created: Wed Mar 5 16:11:43 2003 |
3 | -- Author: Sergey KUUL |
4 | -- <skl@friendox> |
5 | ---Copyright: Matra Datavision 2003 |
6 | |
7 | class Material from XCAFDoc inherits Attribute from TDF |
8 | uses |
9 | Label from TDF, |
10 | RelocationTable from TDF, |
11 | HAsciiString from TCollection |
12 | |
13 | is |
14 | Create returns Material from XCAFDoc; |
15 | |
16 | ---Category: class methods |
17 | -- ============= |
18 | |
19 | GetID (myclass) |
20 | ---C++: return const & |
21 | returns GUID from Standard; |
22 | |
23 | Set (myclass; label : Label from TDF; |
24 | aName : HAsciiString from TCollection; |
25 | aDescription : HAsciiString from TCollection; |
26 | aDensity : Real from Standard; |
27 | aDensName : HAsciiString from TCollection; |
28 | aDensValType : HAsciiString from TCollection) |
29 | returns Material from XCAFDoc; |
30 | |
31 | Set (me : mutable; aName : HAsciiString from TCollection; |
32 | aDescription : HAsciiString from TCollection; |
33 | aDensity : Real from Standard; |
34 | aDensName : HAsciiString from TCollection; |
35 | aDensValType : HAsciiString from TCollection); |
36 | |
37 | GetName (me) returns HAsciiString from TCollection; |
38 | |
39 | GetDescription (me) returns HAsciiString from TCollection; |
40 | |
41 | GetDensity (me) returns Real from Standard; |
42 | |
43 | GetDensName (me) returns HAsciiString from TCollection; |
44 | |
45 | GetDensValType (me) returns HAsciiString from TCollection; |
46 | |
47 | ID (me) |
48 | ---C++: return const & |
49 | returns GUID from Standard; |
50 | |
51 | Restore (me: mutable; With : Attribute from TDF); |
52 | |
53 | NewEmpty (me) |
54 | returns mutable Attribute from TDF; |
55 | |
56 | Paste (me; Into : mutable Attribute from TDF; |
57 | RT : mutable RelocationTable from TDF); |
58 | |
59 | fields |
60 | myName : HAsciiString from TCollection; |
61 | myDescription : HAsciiString from TCollection; |
62 | myDensity : Real from Standard; |
63 | myDensName : HAsciiString from TCollection; |
64 | myDensValType : HAsciiString from TCollection; |
65 | |
66 | end Material; |