blob: 3b6dcd36ff897cbab930bc1ef770a0b73be7605e (
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
66
67
68
69
70
71
|
-- File: GGraphic2d_Curve.cdl
-- Created: Thu Jul 1 10:03:27 1993
-- Author: Jean Louis FRENKEL
-- <jlf@stylox>
-- Modified: TCL G002A, 28-11-00, new method GeomCurve(...)
---Copyright: Matra Datavision 1993
class Curve from GGraphic2d inherits Line from Graphic2d
---Version:
---Purpose: The primitive Curve
---Keywords: Primitive, Curve
---Warning:
---References:
uses
Drawer from Graphic2d,
Curve from Geom2d,
GraphicObject from Graphic2d,
FStream from Aspect,
IFStream from Aspect
is
--------------------------------------
-- Category: Constructors
--------------------------------------
Create (aGraphicObject: GraphicObject from Graphic2d;
aCurve: Curve from Geom2d)
returns mutable Curve from GGraphic2d;
---Level: Public
---Purpose: Creates a curve.
---Category: Constructors
--------------------------------------
-- Category: Inquire methods
--------------------------------------
GeomCurve( me ) returns Curve from Geom2d;
---Level: Internal
---Purpose: returns the geometric curve
--------------------------------------
-- Category: Draw and Pick
--------------------------------------
Draw (me : mutable; aDrawer: Drawer from Graphic2d)
is static protected;
---Level: Internal
---Purpose: Draws the curve <me>.
Pick (me : mutable; X, Y: ShortReal from Standard;
aPrecision: ShortReal from Standard;
aDrawer: Drawer from Graphic2d)
returns Boolean from Standard is static protected;
---Level: Internal
---Purpose: Returns Standard_True if the curve <me> is picked,
-- Standard_False if not.
----------------------------------------------------------------
Save( me; aFStream: in out FStream from Aspect ) is virtual protected;
Retrieve(myclass; anIFStream: in out IFStream from Aspect;
aGraphicObject: GraphicObject from Graphic2d);
fields
myCurve: Curve from Geom2d;
end Curve from GGraphic2d;
|
