1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-05-21 10:55:33 +03:00
occt/src/Draw/Draw_Display.cdl
bugmster 973c2be1e1 0024428: Implementation of LGPL license
The copying permission statements at the beginning of source files updated to refer to LGPL.
Copyright dates extended till 2014 in advance.
2013-12-17 12:42:41 +04:00

142 lines
4.2 KiB
Plaintext

-- Created on: 1991-07-15
-- Created by: Arnaud BOUZY
-- Copyright (c) 1991-1999 Matra Datavision
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
--
-- This file is part of Open CASCADE Technology software library.
--
-- This library is free software; you can redistribute it and / or modify it
-- under the terms of the GNU Lesser General Public version 2.1 as published
-- by the Free Software Foundation, with special exception defined in the file
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
-- distribution for complete text of the license and disclaimer of any warranty.
--
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Display from Draw
---Purpose: Use to draw in a 3d or a 2d view.
--
-- * The 3d methods draw in the 3d system, in a 2d
-- view the drawing is projected on X,Y.
--
-- * The 2d methods draw in the projection plane.
--
-- * To draw in screen coordinates the length must be
-- divided by the zoom.
uses
CString,
Color from Draw,
MarkerShape from Draw,
Pnt from gp,
Pnt2d from gp,
Circ from gp,
Circ2d from gp
is
Create
returns Display;
SetColor(me; col : Color)
---Purpose: Following drawings will use this color.
is static;
SetMode(me; M : Integer)
---Purpose: Set the drawing mode, 3 = copy, 6 = xor
is static;
Flush(me)
is static;
MoveTo(me : in out; pt : Pnt from gp)
is static;
DrawTo(me : in out; pt : Pnt from gp)
is static;
MoveTo(me : in out; pt : Pnt2d from gp)
is static;
DrawTo(me : in out; pt : Pnt2d from gp)
is static;
Draw(me : in out; p1,p2 : Pnt from gp)
is static;
Draw(me : in out; p1,p2 : Pnt2d from gp)
is static;
Draw(me : in out; C : Circ from gp; A1, A2 : Real;
ModifyWithZoom : Boolean = Standard_True)
---Purpose: Draw a circle <C> from angle <A1> to <A2>
-- (Radians). if ModifyWithZoom = 0, then
-- rayon of circle is convert to Integer.
is static;
Draw(me : in out; C : Circ2d from gp; A1, A2 : Real;
ModifyWithZoom : Boolean = Standard_True)
---Purpose: Draw a 2D circle <C> from angle <A1> to <A2>
-- (Radians). if ModifyWithZoom = 0, then
-- rayon of circle is convert to Integer.
is static;
DrawMarker(me : in out; pt : Pnt from gp; S : MarkerShape from Draw;
Size : Integer = 5)
is static;
DrawMarker(me : in out; pt : Pnt2d from gp; S : MarkerShape from Draw;
Size : Integer = 5)
is static;
DrawMarker(me : in out; pt : Pnt from gp; S : MarkerShape from Draw;
Size : Real)
is static;
DrawMarker(me : in out; pt : Pnt2d from gp; S : MarkerShape from Draw;
Size : Real)
is static;
DrawString(me : in out; pt : Pnt from gp; S : CString)
is static;
DrawString(me : in out; pt : Pnt2d from gp; S : CString)
is static;
DrawString(me : in out; pt : Pnt from gp; S : CString; moveX : Real; moveY : Real)
is static;
DrawString(me : in out; pt : Pnt2d from gp; S : CString; moveX : Real; moveY : Real)
is static;
Project(me; pt : Pnt from gp) returns Pnt2d from gp
---Purpose: Returns the 2D projection of a 3D point.
is static;
Project(me; pt : Pnt from gp; pt2d : out Pnt2d from gp)
---Purpose: Returns the 2D projection of a 3D point.
is static;
Zoom(me) returns Real
---Purpose: Returns the current Zoom value.
is static;
ViewId(me) returns Integer
---Purpose: Returns the identifier of the view where the
-- display is drawing.
is static;
HasPicked(me) returns Boolean
---Purpose: Returs True if the last drawing operations
-- generated a pick hit. When HasPicked is True the
-- Drawing should be resumed.
--
-- This function is used to shorten the drawing when
-- picking and to save the picked sub-parts.
is static;
end Display;