Integration of OCCT 6.5.0 from SVN
[occt.git] / src / TestTopOpeDraw / TestTopOpeDraw_DrawableSUR.cdl
1 -- File:        TestTopOpeDraw_DrawableSUR.cdl
2 -- Created:     Tue Sep 10 18:10:40 1996
3 -- Author:      Jean Yves LEBEY
4 --              <jyl@bistrox.paris1.matra-dtv.fr>
5 ---Copyright:    Matra Datavision 1996
6
7 class DrawableSUR from TestTopOpeDraw inherits Surface from DrawTrSurf
8
9 uses 
10     
11     Surface     from Geom,
12     Color           from Draw,
13     Display         from Draw,
14     Text3D          from Draw,
15     CString         from Standard,
16     Pnt             from gp,
17     Pnt2d           from gp
18
19 is 
20
21     Create (S : Surface from Geom; IsoColor : Color from Draw)
22     returns mutable DrawableSUR from TestTopOpeDraw;
23
24     Create (S : Surface from Geom; IsoColor : Color from Draw;
25             Text : CString from Standard; TextColor : Color from Draw)
26     returns mutable DrawableSUR from TestTopOpeDraw;
27
28     Create (S : Surface from Geom; IsoColor : Color from Draw;
29             BoundColor,NormalColor : Color from Draw;
30             Text : CString from Standard; TextColor : Color from Draw;
31             Nu,Nv : Integer;
32             Discret : Integer; Deflection : Real; DrawMode : Integer;
33             DispOrigin : Boolean from Standard = Standard_True)
34     returns mutable DrawableSUR from TestTopOpeDraw;
35
36     Pnt(me) returns Pnt from gp
37     is static;
38
39     Pnt2d(me) returns Pnt2d from gp
40     is static;
41     
42     DrawOn(me; dis : in out Display from Draw)
43     is redefined;
44
45     NormalColor(me : mutable; NormalColor : Color from Draw)
46     is static;
47
48     DrawNormale(me; dis : in out Display from Draw)
49     is static;
50     
51 fields
52
53     myText : Text3D from Draw;
54     myNormalColor : Color from Draw;
55     
56 end DrawableSUR;