1 -- Created by: DAUTRY Philippe
2 -- Copyright (c) 1997-1999 Matra Datavision
3 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
5 -- This file is part of Open CASCADE Technology software library.
7 -- This library is free software; you can redistribute it and/or modify it under
8 -- the terms of the GNU Lesser General Public License version 2.1 as published
9 -- by the Free Software Foundation, with special exception defined in the file
10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 -- distribution for complete text of the license and disclaimer of any warranty.
13 -- Alternatively, this file may be used under the terms of Open CASCADE
14 -- commercial license or contractual agreement.
19 --Version Date Purpose
20 -- 0.0 Oct 3 1997 Creation
23 class Browser from DDF inherits Drawable3D from Draw
25 ---Purpose: Browses a data framework from TDF.
31 AttributeIndexedMap from TDF,
32 Interpretor from Draw,
34 AsciiString from TCollection
40 Create (aDF : Data from TDF)
41 returns Browser from DDF;
44 DrawOn (me; dis : in out Display);
48 returns Drawable3D from Draw
51 Dump (me; S : in out OStream)
54 Whatis (me; I : in out Interpretor from Draw)
57 -- Specific methods -------------------------------------------------------
59 Data (me : mutable; aDF : Data from TDF);
62 returns Data from TDF;
65 returns AsciiString from TCollection;
66 ---Purpose: Returns a string composed with the sub-label
69 OpenLabel(me; aLab : Label from TDF)
70 returns AsciiString from TCollection;
71 ---Purpose: Returns a string composed with the sub-label
74 OpenAttributeList(me : mutable;
75 aLab : Label from TDF)
76 returns AsciiString from TCollection;
77 ---Purpose: Returns a string composed with the attribute index
78 -- (found in <myAttMap>) of <aLab>.
80 OpenAttribute(me : mutable;
81 anIndex : Integer from Standard = 0)
82 returns AsciiString from TCollection;
83 ---Purpose: Returns a string composed with the list of
84 -- referenced attribute index of the attribute
85 -- <anIndex>. For exemple, it is usefull for
86 -- TDataStd_Group. It uses a mecanism based on a
87 -- DDF_AttributeBrowser.
90 returns AsciiString from TCollection;
91 ---Purpose: Returns information about <me> to be displayed in
92 -- information window.
94 Information(me; aLab : Label from TDF)
95 returns AsciiString from TCollection;
96 ---Purpose: Returns information about <aLab> to be displayed
97 -- in information window.
99 Information(me; anIndex : Integer from Standard = 0)
100 returns AsciiString from TCollection;
101 ---Purpose: Returns information about attribute <anIndex> to
102 -- be displayed in information window.
107 myDF : Data from TDF;
108 myAttMap : AttributeIndexedMap from TDF;