7fd59977 |
1 | -- File: TDataStd_Integer.cdl |
2 | -- Created: Thu Feb 6 17:04:48 1997 |
3 | -- Author: Denis PASCAL |
4 | ---Copyright: Matra Datavision 1997 |
5 | |
6 | |
7 | class Integer from TDataStd inherits Attribute from TDF |
8 | |
9 | ---Purpose: The basis to define an integer attribute. |
10 | |
11 | uses Attribute from TDF, |
12 | Label from TDF, |
13 | GUID from Standard, |
14 | Integer from Standard, |
15 | RelocationTable from TDF |
16 | |
17 | is |
18 | |
19 | ---Purpose: class methods |
20 | -- ============= |
21 | |
22 | GetID (myclass) |
23 | ---C++: return const & |
24 | ---Purpose: Returns the GUID for integers. |
25 | returns GUID from Standard; |
26 | |
27 | Set (myclass; label : Label from TDF; value : Integer from Standard) |
28 | ---Purpose: Finds, or creates, an Integer attribute and sets <value> |
29 | -- the Integer attribute is returned. |
30 | returns Integer from TDataStd; |
31 | |
32 | ---Purpose: Integer methods |
33 | -- =============== |
34 | |
35 | Set (me : mutable; V : Integer from Standard); |
36 | |
37 | Get (me) |
38 | returns Integer from Standard; |
39 | ---Purpose: Returns the integer value contained in the attribute. |
40 | IsCaptured(me) returns Boolean; |
41 | ---Purpose: Returns True if there is a reference on the same label |
42 | |
43 | ---Category: methodes de TDF_Attribute |
44 | -- ========================= |
45 | |
46 | ID (me) |
47 | ---C++: return const & |
48 | returns GUID from Standard; |
49 | |
50 | Restore (me: mutable; With : Attribute from TDF); |
51 | |
52 | NewEmpty (me) |
53 | returns mutable Attribute from TDF; |
54 | |
55 | Paste (me; Into : mutable Attribute from TDF; |
56 | RT : mutable RelocationTable from TDF); |
57 | |
58 | Dump(me; anOS : in out OStream from Standard) |
59 | returns OStream from Standard |
60 | is redefined; |
61 | ---C++: return & |
62 | |
63 | |
64 | Create |
65 | returns mutable Integer from TDataStd; |
66 | |
67 | |
68 | fields |
69 | |
70 | myValue : Integer from Standard; |
71 | |
72 | end Integer; |