blob: 7382528ab32c6fb6aebbbad50ae1cc21aa3a2c66 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
-- File: XCAFPrs_Style.cdl
-- Created: Fri Aug 11 19:29:16 2000
-- Author: Andrey BETENEV
-- <abv@doomox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 2000
class Style from XCAFPrs
---Purpose: Represents a set of styling settings applicable to
-- a (sub)shape
uses
Color from Quantity
is
Create returns Style from XCAFPrs;
IsSetColorSurf (me) returns Boolean;
GetColorSurf (me) returns Color from Quantity;
SetColorSurf (me: in out; col: Color from Quantity);
UnSetColorSurf (me: in out);
---Purpose: Manage surface color setting
IsSetColorCurv (me) returns Boolean;
GetColorCurv (me) returns Color from Quantity;
SetColorCurv (me: in out; col: Color from Quantity);
UnSetColorCurv (me: in out);
---Purpose: Manage curve color setting
SetVisibility(me: in out; visibility: Boolean from Standard);
IsVisible(me) returns Boolean;
---Purpose: Manage visibility
-- Note: Setting visibility to False makes colors undefined
-- This is necessary for HashCode
IsEqual (me; other: Style from XCAFPrs) returns Boolean;
---Purpose: Returs True if styles are the same
---C++: alias operator ==
---Purpose: Methods for using Style as key in maps
HashCode(myclass; S : Style from XCAFPrs; Upper : Integer) returns Integer;
---Purpose: Returns a HasCode value for the Key <K> in the
-- range 0..Upper.
IsEqual(myclass; S1, S2 : Style from XCAFPrs) returns Boolean;
---Purpose: Returns True when the two keys are the same. Two
-- same keys must have the same hashcode, the
-- contrary is not necessary.
fields
-- defColor: Boolean;
defColorSurf: Boolean;
defColorCurv: Boolean;
myVisibility: Boolean from Standard;
-- myColor: Color from Quantity;
myColorSurf: Color from Quantity;
myColorCurv: Color from Quantity;
end Style;
|