1 -- Created on: 1999-05-13
2 -- Created by: data exchange team
3 -- Copyright (c) 1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
6 -- This file is part of Open CASCADE Technology software library.
8 -- This library is free software; you can redistribute it and/or modify it under
9 -- the terms of the GNU Lesser General Public License version 2.1 as published
10 -- by the Free Software Foundation, with special exception defined in the file
11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 -- distribution for complete text of the license and disclaimer of any warranty.
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
17 class ConvertCurve3dToBezier from ShapeUpgrade inherits SplitCurve3d from ShapeUpgrade
19 ---Purpose: converts/splits a 3d curve of any type to a list of beziers
23 HSequenceOfCurve from TColGeom,
24 HSequenceOfReal from TColStd
28 Create returns ConvertCurve3dToBezier from ShapeUpgrade;
29 ---Purpose: Empty constructor
31 SetLineMode(me:mutable; mode: Boolean);
32 ---Purpose: Sets mode for conversion Geom_Line to bezier.
35 GetLineMode(me) returns Boolean;
36 ---Purpose: Returns the Geom_Line conversion mode.
39 SetCircleMode(me:mutable; mode: Boolean);
40 ---Purpose: Sets mode for conversion Geom_Circle to bezier.
43 GetCircleMode(me) returns Boolean;
44 ---Purpose: Returns the Geom_Circle conversion mode.
47 SetConicMode(me:mutable; mode: Boolean);
48 ---Purpose: Returns the Geom_Conic conversion mode.
51 GetConicMode(me) returns Boolean;
52 ---Purpose: Performs converting and computes the resulting shape.
55 Compute(me: mutable) is redefined;
56 ---Purpose: Converts curve into a list of beziers, and stores the
57 -- splitting parameters on original curve.
59 Build (me: mutable; Segment: Boolean) is redefined;
60 ---Purpose: Splits a list of beziers computed by Compute method according
61 -- the split values and splitting parameters.
63 Segments(me) returns HSequenceOfCurve from TColGeom is private;
64 ---Purpose: Returns the list of bezier curves correspondent to original
67 SplitParams(me) returns HSequenceOfReal from TColStd;
68 ---Purpose: Returns the list of splitted parameters in original curve
73 mySegments : HSequenceOfCurve from TColGeom;
74 mySplitParams: HSequenceOfReal from TColStd;
76 myCircleMode : Boolean;
77 myConicMode : Boolean;
79 end ConvertCurve2dToBezier;