7fd59977 |
1 | -- File: OverRidingStyledItem.cdl |
2 | -- Created: Fri Dec 1 11:11:23 1995 |
3 | -- Author: EXPRESS->CDL V0.2 Translator |
4 | -- Copyright: Matra-Datavision 1993 |
5 | |
6 | |
7 | class OverRidingStyledItem from StepVisual |
8 | |
9 | inherits StyledItem from StepVisual |
10 | |
11 | uses |
12 | |
13 | HAsciiString from TCollection, |
14 | HArray1OfPresentationStyleAssignment from StepVisual, |
15 | RepresentationItem from StepRepr |
16 | is |
17 | |
18 | Create returns mutable OverRidingStyledItem; |
19 | ---Purpose: Returns a OverRidingStyledItem |
20 | |
21 | |
22 | Init (me : mutable; |
23 | aName : mutable HAsciiString from TCollection; |
24 | aStyles : mutable HArray1OfPresentationStyleAssignment from StepVisual; |
25 | aItem : mutable RepresentationItem from StepRepr) is redefined; |
26 | |
27 | Init (me : mutable; |
28 | aName : mutable HAsciiString from TCollection; |
29 | aStyles : mutable HArray1OfPresentationStyleAssignment from StepVisual; |
30 | aItem : mutable RepresentationItem from StepRepr; |
31 | aOverRiddenStyle : mutable StyledItem from StepVisual) is virtual; |
32 | |
33 | -- Specific Methods for Field Data Access -- |
34 | |
35 | SetOverRiddenStyle(me : mutable; aOverRiddenStyle : mutable StyledItem); |
36 | OverRiddenStyle (me) returns mutable StyledItem; |
37 | |
38 | fields |
39 | |
40 | overRiddenStyle : StyledItem from StepVisual; |
41 | |
42 | end OverRidingStyledItem; |