7fd59977 |
1 | -- File: TDataStd_DeltaOnModificationOfByteArray.cdl |
2 | -- Created: Wed Dec 5 15:43:43 2007 |
3 | -- Author: Sergey ZARITCHNY |
4 | -- <sergey.zaritchny@opencascade.com> |
5 | ---Copyright: Open CasCade SA 2007 |
6 | |
7 | |
8 | class DeltaOnModificationOfByteArray from TDataStd inherits DeltaOnModification from TDF |
9 | |
10 | ---Purpose: This class provides default services for an |
11 | -- AttributeDelta on a MODIFICATION action. |
12 | |
13 | uses |
14 | Attribute from TDF, |
15 | HArray1OfInteger from TColStd, |
16 | HArray1OfByte from TColStd, |
17 | ByteArray from TDataStd |
18 | |
19 | is |
20 | |
21 | Create (Arr : ByteArray from TDataStd) |
22 | returns mutable DeltaOnModificationOfByteArray from TDataStd; |
23 | ---Purpose: Initializes a TDF_DeltaOnModification. |
24 | |
25 | Apply (me : mutable) |
26 | is redefined virtual; |
27 | ---Purpose: Applies the delta to the attribute. |
28 | fields |
29 | |
30 | myIndxes : HArray1OfInteger from TColStd; |
31 | myValues : HArray1OfByte from TColStd; |
32 | myUp1 : Integer from Standard; |
33 | myUp2 : Integer from Standard; |
34 | |
35 | end DeltaOnModificationOfByteArray; |
36 | |