1 -- Created on: 1995-08-09
2 -- Created by: Arnaud BOUZY
3 -- Copyright (c) 1995-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
9 -- under the terms of the GNU Lesser General Public 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 -- GG : GER61351 17/11/1999 Change SetColor() with a compatible Quantity_Color instead
18 -- the restricted NameOfColor.
20 class Point from AIS inherits InteractiveObject from AIS
22 ---Purpose: Constructs point datums to be used in construction of
23 -- composite shapes. The datum is displayed as the plus marker +.
27 TypeOfMarker from Aspect,
28 Presentation from Prs3d,
29 PresentationManager3d from PrsMgr,
30 NameOfColor from Quantity,
32 Selection from SelectMgr,
34 Transformation from Geom,
36 KindOfInteractive from AIS
40 Create(aComponent : Point from Geom)
41 returns mutable Point from AIS;
43 -- Initializes the point aComponent from which the point
44 -- datum will be built.
46 Signature(me) returns Integer from Standard is redefined;
47 ---Purpose: Returns index 1, the default index for a point.
50 Type(me) returns KindOfInteractive from AIS is redefined;
51 ---Purpose: Indicates that a point is a datum.
54 Component(me: mutable) returns Point from Geom
56 ---Purpose: Returns the component specified in SetComponent.
57 SetComponent(me: mutable;aComponent:Point from Geom )
59 ---Purpose: Constructs an instance of the point aComponent.
60 AcceptDisplayMode(me;aMode:Integer from Standard) returns Boolean from Standard is redefined static;
61 ---Purpose: Returns true if the display mode selected is valid for point datums.
64 aPresentationManager: PresentationManager3d from PrsMgr;
65 aPresentation : mutable Presentation from Prs3d;
66 aMode : Integer from Standard = 0)
67 is redefined virtual protected;
70 aProjector: Projector from Prs3d;
71 aPresentation: mutable Presentation from Prs3d)
72 is redefined static private;
75 aProjector : Projector from Prs3d;
76 aTrsf : Transformation from Geom;
77 aPresentation : mutable Presentation from Prs3d)
79 ---Purpose: computes the presentation according to a point of view
80 -- given by <aProjector>.
81 -- To be Used when the associated degenerated Presentations
82 -- have been transformed by <aTrsf> which is not a Pure
83 -- Translation. The HLR Prs can't be deducted automatically
84 -- WARNING :<aTrsf> must be applied
85 -- to the object to display before computation !!!
87 -- Methods from SelectableObject
89 ComputeSelection(me : mutable;
90 aSelection : mutable Selection from SelectMgr;
91 aMode : Integer from Standard )is private;
93 -- Methods from InteractiveObject
95 SetColor(me :mutable; aColor : NameOfColor from Quantity)
97 ---Purpose: Allows you to provide settings for the cp;pr aColor.
98 SetColor(me :mutable; aColor : Color from Quantity)
101 UnsetColor(me:mutable) is redefined static;
102 ---Purpose: Allows you to remove color settings.
103 SetMarker(me:mutable; aType : TypeOfMarker from Aspect);
104 ---Purpose: Allows you to provide settings for a marker. These include
109 UnsetMarker(me:mutable);
110 ---Purpose: Removes the marker settings.
111 HasMarker(me) returns Boolean from Standard;
112 ---Purpose: Returns true if the point datum has a marker.
115 Vertex(me) returns Vertex from TopoDS;
116 ---Purpose: Converts a point into a vertex.
117 UpdatePointValues(me:mutable) is private;
124 myComponent : Point from Geom;
125 myHasTOM : Boolean from Standard;
126 myTOM : TypeOfMarker from Aspect;