blob: 2e4ea3158611ac2cec7b5bcdb05f5aa0f40a7043 (
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
|
-- File: SelectBasics_EntityOwner.cdl
-- Created: Thu Feb 9 14:58:14 1995
-- Author: Mister rmi
-- <rmi@photon>
---Copyright: Matra Datavision 1995
deferred class EntityOwner from SelectBasics inherits TShared from MMgt
---Purpose: defines an abstract owner of sensitive primitives.
-- Owners are typically used to establish a connection
-- between sensitive entities and high-level objects (e.g. presentations).
--
-- Priority : It's possible to give a priority:
-- the scale : [0-9] ; the default priority is 0
-- it allows the predominance of one selected object upon
-- another one if many objects are selected at the same time
--
--
-- example : Selection of shapes : the owners are
-- selectable objects (presentations)
--
-- a user can give vertex priority [3], edges [2] faces [1] shape [0],
-- so that if during selection one vertex one edge and one face are
-- simultaneously detected, the vertex will only be hilighted.
uses
Location from TopLoc
is
Initialize (aPriority: Integer = 0) ;
---Level: Public
Set (me:mutable; aPriority :Integer) is static;
---Level: Public
---Purpose: sets the selectable priority of the owner
---C++: inline
Priority(me) returns Integer is static;
---Level: Public
---C++: inline
-- Deferred methods dealing with locations.
-- Used in Select3D package.
HasLocation(me) returns Boolean from Standard is deferred;
SetLocation(me:mutable; aLoc : Location from TopLoc) is deferred;
ResetLocation(me:mutable) is deferred;
Location(me) returns Location from TopLoc is deferred;
---C++: return const&
fields
mypriority : Integer is protected;
end EntityOwner;
|
