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
80
81
|
-- File: DDataStd_DrawDisplay.cdl
-- Created: Mon Sep 7 10:35:02 1998
-- Author: Denis PASCAL
-- <dp@dingox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class DrawDriver from DDataStd inherits TShared from MMgt
---Purpose: priority rule to display standard attributes is :
-- * 1 Constraint
-- * 2 Object
-- * 3 Datum (Point,Axis,Plane)
-- * 4 Geometry
-- * 5 NamedShape
uses ColorKind from Draw,
Drawable3D from Draw,
Label from TDF,
Attribute from TDF,
Integer from TDataStd,
Real from TDataStd,
Point from TDataXtd,
Axis from TDataXtd,
Plane from TDataXtd,
Geometry from TDataXtd,
Constraint from TDataXtd,
NamedShape from TNaming,
Shape from TopoDS
is
---Purpose: access to the current DrawDriver
-- ================================
Set (myclass; DD : DrawDriver from DDataStd);
Get (myclass)
returns DrawDriver from DDataStd;
Create
returns DrawDriver from DDataStd;
---Purpose: next method is called by DrawPresentation (may be redefined)
-- ============================================================
Drawable (me; L : Label from TDF)
returns Drawable3D from Draw
is virtual;
---Purpose: reusable methods (may used when redefined <Drawable>)
-- =====================================================
DrawableConstraint (me; C : Constraint from TDataXtd)
returns Drawable3D from Draw;
DrawableShape (me; L : Label from TDF;
color : ColorKind from Draw;
current : Boolean from Standard = Standard_True)
returns Drawable3D from Draw;
DrawableShape (myclass; s : Shape from TopoDS;
color : ColorKind from Draw)
---Purpose: May be used for temporary display of a shape
returns Drawable3D from Draw;
end DrawDriver;
|
