src/DrawTrSurf/DrawTrSurf_BSplineCurve2d.cdl

   1
   2 -- File:        BSplineCurve2d.cdl
   3 -- Created:     Fri May 22 10:46:49 1992
   4 -- Author:      Jean Claude VAUTHIER
   5 --              <jcv@sdsun4>
   6 ---Copyright:    Matra Datavision 1992
   7
   8
   9 class BSplineCurve2d
  10
  11
  12 from DrawTrSurf
  13
  14
  15 inherits Curve2d from DrawTrSurf
  16
  17
  18 uses BSplineCurve from Geom2d,
  19      Color from Draw,
  20      MarkerShape from Draw,
  21      Display from Draw,
  22      Drawable3D from Draw
  23
  24
  25 is
  26
  27
  28   Create (C : BSplineCurve from Geom2d)
  29         --- Purpose :
  30         --  creates a drawable BSpline curve from a BSpline curve of
  31         --  package Geom2d.
  32      returns mutable BSplineCurve2d from DrawTrSurf;
  33
  34
  35   Create (C : BSplineCurve from Geom2d;
  36           CurvColor, PolesColor, KnotsColor : Color from Draw;
  37           KnotsShape : MarkerShape from Draw; KnotsSize : Integer;
  38           ShowPoles, ShowKnots : Boolean; Discret : Integer)
  39      returns mutable BSplineCurve2d from DrawTrSurf;
  40
  41
  42   DrawOn (me; dis : in out Display from Draw)
  43      is redefined static;
  44
  45   ShowPoles (me : mutable)
  46      is static;
  47
  48   ShowKnots (me : mutable)
  49      is static;
  50
  51   ClearPoles (me : mutable)
  52      is static;
  53
  54   ClearKnots (me : mutable)
  55      is static;
  56
  57   FindPole(me; X,Y : Real; D : Display from Draw; Prec : Real;
  58            Index : in out Integer)
  59     ---Purpose: Returns in <Index> the index of the first pole  of the
  60     --          curve projected by the Display <D> at a distance lower
  61     --          than <Prec> from <X,Y>. If no pole  is found  index is
  62     --          set to 0, else index is always  greater than the input
  63     --          value of index.
  64   is static;
  65
  66   FindKnot(me; X,Y : Real; D : Display from Draw; Prec : Real;
  67            Index : in out Integer)
  68   is static;
  69
  70   SetPolesColor (me : mutable; aColor : Color from Draw)
  71         ---C++: inline
  72      is static;
  73
  74   SetKnotsColor (me : mutable; aColor : Color from Draw)
  75         ---C++: inline
  76      is static;
  77
  78   SetKnotsShape (me : mutable; Shape : MarkerShape from Draw)
  79         ---C++: inline
  80      is static;
  81
  82   KnotsShape (me)  returns MarkerShape from Draw
  83         ---C++: inline
  84      is static;
  85
  86   KnotsColor (me)  returns Color from Draw
  87         ---C++: inline
  88      is static;
  89
  90   PolesColor (me)  returns Color from Draw
  91         ---C++: inline
  92      is static;
  93
  94   Copy(me) returns mutable Drawable3D from Draw
  95         ---Purpose: For variable copy.
  96   is redefined;
  97
  98
  99 fields
 100
 101   drawPoles  : Boolean;
 102   drawKnots  : Boolean;
 103   knotsForm  : MarkerShape from Draw;
 104   knotsLook  : Color from Draw;
 105   knotsDim   : Integer;
 106   polesLook  : Color from Draw;
 107
 108 end BSplineCurve2d;