0023510: Integration of test grid "vis" into the new testing system
[occt.git] / src / Prs2d / Prs2d_AspectHidingText.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 AspectHidingText from Prs2d inherits AspectRoot from Prs2d
21  
22  ---Purpose: defines the attributes when drawing a hiding text
23
24 uses
25  
26  NameOfColor from Quantity,
27  TypeOfFont from Aspect,
28  WidthOfLine from Aspect
29
30
31 is
32  
33     Create ( ColorInd:       NameOfColor from Quantity;
34                HidingColorInd: NameOfColor from Quantity;
35              FrameColorInd:  NameOfColor from Quantity;
36              FrameWidthInd:  WidthOfLine from Aspect;
37              FontInd:        TypeOfFont  from Aspect;
38              aSlantInd:      ShortReal   from Standard;
39              aHScaleInd:     ShortReal   from Standard;
40                aWScaleInd:     ShortReal   from Standard;
41              isUnderlined:   Boolean     from Standard)
42          returns mutable AspectHidingText from Prs2d;
43             
44     SetColorOfText      ( me: mutable;  aColorInd:      NameOfColor from  Quantity); 
45     SetHidingColorOfText( me: mutable;  aHidColorInd:   NameOfColor from  Quantity); 
46     SetFrameColorOfText ( me: mutable;  aFrameColorInd: NameOfColor from  Quantity); 
47     SetFrameWidthOfText ( me: mutable;  aFrameWidthInd: WidthOfLine from  Aspect); 
48     SetFontOfText       ( me: mutable;  aFontInd:       TypeOfFont  from  Aspect);  
49     SetSlant            ( me: mutable;  aSlantInd:      ShortReal   from  Standard); 
50     SetHScale           ( me: mutable;  aHScaleInd:     ShortReal   from  Standard); 
51     SetWScale           ( me: mutable;  aWScaleInd:     ShortReal   from  Standard);  
52     SetUnderlined       ( me: mutable;  anIsUnderline:  Boolean     from  Standard); 
53     
54     Values( me;
55               ColorInd:       out NameOfColor from Quantity;
56               HidingColorInd: out NameOfColor from Quantity;
57              FrameColorInd:  out NameOfColor from Quantity;
58              FrameWidthInd:  out WidthOfLine from Aspect;
59              FontInd:        out TypeOfFont from Aspect;
60              aSlantInd:      out ShortReal from Standard;
61              aHScaleInd:     out ShortReal from Standard;
62                  aWScaleInd:     out ShortReal from Standard;
63              isUnderlined:   out Boolean from Standard );
64
65 fields
66
67     myFontInd         : TypeOfFont from Aspect;
68     myColorInd        : NameOfColor from Quantity;
69     HidingColorInd    : NameOfColor from Quantity;
70     FrameColorInd     : NameOfColor from Quantity;
71     FrameWidthInd     : WidthOfLine from Aspect;
72     mySlantInd        : ShortReal from Standard;
73     myHScaleInd       : ShortReal from Standard;
74     myWScaleInd       : ShortReal from Standard;
75     myIsUnderlined    : Boolean   from Standard;
76     
77 end AspectHidingText from Prs2d;