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