blob: 8aa95ef5dba36b7e44190d9de93bc9d01f712798 (
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
72
73
74
75
76
77
78
79
|
-- File : MeshVS_MeshEntityOwner.cdl
-- Created : 10 October 2003
-- Author : Alexander SOLOVYOV
---Copyright: Open CASCADE 2003
class MeshEntityOwner from MeshVS inherits EntityOwner from SelectMgr
---Purpose: The custom owner. This class provides methods to store owner information:
-- 1) An address of element or node data structure
-- 2) Type of node or element owner assigned
-- 3) ID of node or element owner assigned
uses
SOPtr from SelectMgr,
Integer from Standard,
Address from Standard,
Array1OfReal from TColStd,
EntityType from MeshVS,
PresentationManager3d from PrsMgr,
PresentationManager from PrsMgr,
NameOfColor from Quantity
is
Create ( SelObj : SOPtr from SelectMgr;
ID : Integer;
MeshEntity : Address;
Type : EntityType from MeshVS;
Priority : Integer = 0;
IsGroup : Boolean = Standard_False ) returns mutable MeshEntityOwner from MeshVS;
Owner ( me ) returns Address;
---Purpose: Returns an address of element or node data structure
Type ( me ) returns EntityType;
---Purpose: Returns type of element or node data structure
ID ( me ) returns Integer;
---Purpose: Returns ID of element or node data structure
IsGroup ( me ) returns Boolean;
---Purpose: Returns true if owner represents group of nodes or elements
IsHilighted ( me; PM : PresentationManager from PrsMgr;
Mode : Integer = 0 ) returns Boolean is redefined;
---Purpose: Returns true if owner is hilighted
Hilight ( me : mutable ) is redefined;
---Purpose: Hilights owner
Hilight ( me : mutable; PM : PresentationManager from PrsMgr;
Mode : Integer = 0 ) is redefined;
---Purpose: Hilights owner
HilightWithColor ( me : mutable; PM : PresentationManager3d from PrsMgr;
theColor : NameOfColor from Quantity;
Mode : Integer = 0 ) is redefined;
---Purpose: Hilights owner with the certain color
Unhilight ( me : mutable; PM : PresentationManager from PrsMgr;
Mode : Integer = 0 ) is redefined;
---Purpose: Strip hilight of owner
Clear ( me : mutable; PM : PresentationManager from PrsMgr;
Mode : Integer = 0 ) is redefined;
fields
myAddr : Address;
myType : EntityType from MeshVS;
myID : Integer;
myIsGroup : Boolean;
end MeshEntityOwner;
|