7fd59977 |
1 | -- File: BezierSurface.cdl |
2 | -- Created: Fri May 22 10:41:09 1992 |
3 | -- Author: Jean Claude VAUTHIER |
4 | -- <jcv@sdsun4> |
5 | ---Copyright: Matra Datavision 1992 |
6 | |
7 | |
8 | class BezierSurface |
9 | |
10 | from DrawTrSurf |
11 | |
12 | inherits Surface from DrawTrSurf |
13 | |
14 | uses BezierSurface from Geom, |
15 | Color from Draw, |
16 | MarkerShape from Draw, |
17 | Display from Draw, |
18 | Drawable3D from Draw |
19 | |
20 | is |
21 | |
22 | |
23 | Create (S : BezierSurface from Geom) |
24 | --- Purpose : |
25 | -- creates a drawable Bezier curve from a Bezier curve of |
26 | -- package Geom. |
27 | returns mutable BezierSurface from DrawTrSurf; |
28 | |
29 | |
30 | |
31 | Create (S : BezierSurface from Geom; |
32 | NbUIsos, NbVIsos : Integer; |
33 | BoundsColor, IsosColor, PolesColor : Color from Draw; |
34 | ShowPoles : Boolean; Discret : Integer;Deflection : Real; |
35 | DrawMode : Integer) |
36 | returns mutable BezierSurface from DrawTrSurf; |
37 | |
38 | |
39 | DrawOn (me; dis : in out Display from Draw) |
40 | is redefined static; |
41 | |
42 | |
43 | ShowPoles (me : mutable) |
44 | is static; |
45 | |
46 | |
47 | ClearPoles (me : mutable) |
48 | is static; |
49 | |
50 | |
51 | FindPole(me; X,Y : Real; D : Display from Draw; Prec : Real; |
52 | UIndex, VIndex : in out Integer) |
53 | is static; |
54 | |
55 | |
56 | SetPolesColor (me : mutable; aColor : Color from Draw) |
57 | ---C++: inline |
58 | is static; |
59 | |
60 | |
61 | PolesColor (me) returns Color from Draw |
62 | ---C++: inline |
63 | is static; |
64 | |
65 | Copy(me) returns mutable Drawable3D from Draw |
66 | ---Purpose: For variable copy. |
67 | is redefined; |
68 | |
69 | |
70 | fields |
71 | |
72 | drawPoles : Boolean; |
73 | polesLook : Color from Draw; |
74 | |
75 | end BezierSurface; |