1 -- Created by: Tanya COOL
2 -- Copyright (c) 2000-2012 OPEN CASCADE SAS
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.
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.
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.
20 class AspectLine from Prs2d inherits AspectRoot from Prs2d
22 ---Purpose: defines the attributes when drawing a line presentation
27 NameOfColor from Quantity,
28 TypeOfLine from Aspect,
29 WidthOfLine from Aspect,
30 TypeOfPolygonFilling from Graphic2d
34 Create returns mutable AspectLine from Prs2d;
35 ---Purpose: default constructor
37 Create( aColor : NameOfColor from Quantity;
38 aType : TypeOfLine from Aspect;
39 aWidth : WidthOfLine from Aspect;
40 aInterColor : NameOfColor from Quantity = Quantity_NOC_YELLOW;
41 aTypeFill : TypeOfPolygonFilling from Graphic2d = Graphic2d_TOPF_EMPTY;
42 aTiled : Integer from Standard = 0;
43 aDrawEdge : Boolean from Standard = Standard_True )
44 returns mutable AspectLine from Prs2d;
45 ---Purpose: Initializes the AspectLine defined values
47 Create( aColor : Color from Quantity;
48 aType : TypeOfLine from Aspect;
49 aWidth : WidthOfLine from Aspect;
50 aInterColor : Color from Quantity;
51 aTypeFill : TypeOfPolygonFilling from Graphic2d = Graphic2d_TOPF_EMPTY;
52 aTileInd : Integer from Standard = 0;
53 aDrawEdge : Boolean from Standard = Standard_True)
54 returns mutable AspectLine from Prs2d;
55 ---Purpose: Initializes the AspectLine defined values
57 ---------------------------------------------------------------------
58 ---Category: Modifications of the class properties
60 SetColor( me: mutable; aColor: NameOfColor from Quantity );
62 ---Purpose: Modifies the Aspect by redefining a color
64 SetColor( me: mutable; aColor: Color from Quantity );
66 ---Purpose: Modifies the Aspect by redefining a color
68 SetType( me: mutable; aType: TypeOfLine from Aspect );
70 ---Purpose: Modifies the Aspect by redefining a type of line
72 SetWidth( me: mutable; aWidth: WidthOfLine from Aspect );
74 ---Purpose: Modifies the Aspect by redefining a width of line
76 SetInterColor( me: mutable; aColor: NameOfColor from Quantity );
78 ---Purpose: Modifies the Aspect by redefining a interior color
80 SetInterColor( me: mutable; aColor: Color from Quantity );
82 ---Purpose: Modifies the Aspect by redefining a interior color
84 SetTypeOfFill( me: mutable; aType: TypeOfPolygonFilling from Graphic2d );
86 ---Purpose: Modifies the Aspect Polygon by redefining its type of polygon filling
88 SetTile( me: mutable; aTile: Integer from Standard);
90 ---Purpose: Sets the tile of the Aspect Polygon
92 SetDrawEdge( me: mutable; aDrawEdge: Boolean from Standard);
94 ---Purpose: Sets the flag <aDrawEdge>
98 aColor: out Color from Quantity;
99 aType: out TypeOfLine from Aspect;
100 aWidth: out WidthOfLine from Aspect);
102 ---Purpose: Return the current values of this line
105 aColor : out Color from Quantity;
106 aTypeFill: out TypeOfPolygonFilling from Graphic2d;
107 aTile : out Integer from Standard;
108 aDrawEdge: out Boolean from Standard );
110 ---Purpose: Returns the current values of this closed line
112 ColorIndex( me ) returns Integer from Standard;
114 ---Purpose: Returns current color index according to the color aspect
116 TypeIndex( me ) returns Integer from Standard;
118 ---Purpose: Returns current type index according to the type aspect
120 WidthIndex( me ) returns Integer from Standard;
122 ---Purpose: Returns current width index according to the width aspect
124 InterColorIndex( me ) returns Integer from Standard;
126 ---Purpose: Returns current color index according to the color aspect
128 SetColorIndex( me: mutable; anInd: Integer from Standard );
130 ---Purpose: Sets current color index according to the color aspect
132 SetTypeIndex( me: mutable; anInd: Integer from Standard );
134 ---Purpose: Sets current type index according to the type aspect
136 SetWidthIndex( me: mutable; anInd: Integer from Standard );
138 ---Purpose: Sets current width index according to the width aspect
140 SetIntColorInd( me: mutable; anInd: Integer from Standard );
142 ---Purpose: Sets current color index according to the color aspect
146 myColor : Color from Quantity;
147 myType : TypeOfLine from Aspect;
148 myWidth : WidthOfLine from Aspect;
149 myInterColor : Color from Quantity;
150 myFillType : TypeOfPolygonFilling from Graphic2d;
151 myTile : Integer from Standard;
152 myDrawEdge : Boolean from Standard;
154 myColorIndex : Integer from Standard;
155 myTypeIndex : Integer from Standard;
156 myWidthIndex : Integer from Standard;
157 myIntColorInd : Integer from Standard;
159 end AspectLine from Prs2d;