0023510: Integration of test grid "vis" into the new testing system
[occt.git] / src / Prs2d / Prs2d_AspectFramedText.cdl
1 -- Created by: Tanya COOL
2 -- Copyright (c) 2000-2012 OPEN CASCADE SAS
3 --
4 -- The content of this file is subject to the Open CASCADE Technology Public
5 -- License Version 6.5 (the "License"). You may not use the content of this file
6 -- except in compliance with the License. Please obtain a copy of the License
7 -- at http://www.opencascade.org and read it completely before using this file.
8 --
9 -- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
10 -- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
11 --
12 -- The Original Code and all software distributed under the License is
13 -- distributed on an "AS IS" basis, without warranty of any kind, and the
14 -- Initial Developer hereby disclaims all such warranties, including without
15 -- limitation, any warranties of merchantability, fitness for a particular
16 -- purpose or non-infringement. Please see the License for the specific terms
17 -- and conditions governing the rights and limitations under the License.
18
19
20 class AspectFramedText from Prs2d inherits AspectRoot from Prs2d
21
22 ---Purpose: defines the attributes when drawing a framed text Presentation.
23
24 uses 
25     
26          NameOfColor from Quantity,
27          WidthOfLine from Aspect,
28          TypeOfFont from Aspect
29
30 is
31  
32     Create(  ColorInd:        NameOfColor from Quantity;
33              FrameColorInd:   NameOfColor from Quantity;
34              FrameWidthInd:   WidthOfLine from Aspect;
35              FontInd:         TypeOfFont from Aspect;
36              aSlant:          ShortReal from Standard;
37              aHScale,aWScale: ShortReal from Standard;
38              isUnderlined:    Boolean from Standard )
39                    returns mutable AspectFramedText from Prs2d;
40
41     SetColorOfText( me: mutable;  aColor:        NameOfColor from Quantity); 
42     SetFrameColor ( me: mutable;  aFrameColor:   NameOfColor from Quantity);  
43     SetFrameWidth ( me: mutable;  aFrameWidth:   WidthOfLine from Aspect); 
44     SetFontOfText ( me: mutable;  aFont:         TypeOfFont from Aspect);  
45     SetSlant      ( me: mutable;  aSlant:        ShortReal  from  Standard); 
46     SetHScale     ( me: mutable;  aHScale:       ShortReal  from  Standard); 
47     SetWScale     ( me: mutable;  aWScale:       ShortReal  from  Standard);  
48     SetUnderlined ( me: mutable;  anIsUnderlined:Boolean from  Standard); 
49
50     Values( me;
51               aColorInd:        out NameOfColor from Quantity;
52             aFrameColorInd:   out NameOfColor from Quantity;
53             aFrameWidthInd:   out WidthOfLine from Aspect;
54             aFontInd:         out TypeOfFont from Aspect;
55             aSlant:           out ShortReal from Standard;
56             aHScale,aWScale:  out ShortReal from Standard;
57             isUnderlined:     out Boolean from Standard );
58     
59 fields
60
61     myColor               : NameOfColor from Quantity;
62     myFrameColor      : NameOfColor from Quantity;
63     myFont                : TypeOfFont from Aspect;
64     myFrameWidth      : WidthOfLine from Aspect;
65     mySlant           : ShortReal from Standard;
66     myHScale          : ShortReal from Standard;
67     myWScale          : ShortReal from Standard;
68     myIsUnderlined    : Boolean from Standard;
69  
70 end AspectFramedText from Prs2d;