mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-18 17:06:14 +08:00
115 lines
3.5 KiB
Plaintext
Executable File
115 lines
3.5 KiB
Plaintext
Executable File
-- Created by: DAUTRY Philippe
|
|
-- Copyright (c) 1997-1999 Matra Datavision
|
|
-- Copyright (c) 1999-2012 OPEN CASCADE SAS
|
|
--
|
|
-- The content of this file is subject to the Open CASCADE Technology Public
|
|
-- License Version 6.5 (the "License"). You may not use the content of this file
|
|
-- except in compliance with the License. Please obtain a copy of the License
|
|
-- at http://www.opencascade.org and read it completely before using this file.
|
|
--
|
|
-- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
|
|
-- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
|
|
--
|
|
-- The Original Code and all software distributed under the License is
|
|
-- distributed on an "AS IS" basis, without warranty of any kind, and the
|
|
-- Initial Developer hereby disclaims all such warranties, including without
|
|
-- limitation, any warranties of merchantability, fitness for a particular
|
|
-- purpose or non-infringement. Please see the License for the specific terms
|
|
-- and conditions governing the rights and limitations under the License.
|
|
|
|
-- ---------------
|
|
|
|
---Version: 0.0
|
|
--Version Date Purpose
|
|
-- 0.0 Oct 3 1997 Creation
|
|
|
|
|
|
class Browser from DDF inherits Drawable3D from Draw
|
|
|
|
---Purpose: Browses a data framework.
|
|
|
|
uses
|
|
|
|
Data from TDF,
|
|
Label from TDF,
|
|
AttributeIndexedMap from TDF,
|
|
Interpretor from Draw,
|
|
Display from Draw,
|
|
AsciiString from TCollection
|
|
|
|
-- raises
|
|
|
|
is
|
|
|
|
Create (aDF : Data from TDF)
|
|
returns mutable Browser from DDF;
|
|
|
|
|
|
DrawOn (me; dis : in out Display);
|
|
|
|
|
|
Copy (me)
|
|
returns mutable Drawable3D from Draw
|
|
is redefined;
|
|
|
|
Dump (me; S : in out OStream)
|
|
is redefined;
|
|
|
|
Whatis (me; I : in out Interpretor from Draw)
|
|
is redefined;
|
|
|
|
-- Specific methods -------------------------------------------------------
|
|
|
|
Data (me : mutable; aDF : Data from TDF);
|
|
|
|
Data (me)
|
|
returns Data from TDF;
|
|
|
|
OpenRoot(me)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns a string composed with the sub-label
|
|
-- entries of <myDF>.
|
|
|
|
OpenLabel(me; aLab : Label from TDF)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns a string composed with the sub-label
|
|
-- entries of <aLab>.
|
|
|
|
OpenAttributeList(me : mutable;
|
|
aLab : Label from TDF)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns a string composed with the attribute index
|
|
-- (found in <myAttMap>) of <aLab>.
|
|
|
|
OpenAttribute(me : mutable;
|
|
anIndex : Integer from Standard = 0)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns a string composed with the list of
|
|
-- referenced attribute index of the attribute
|
|
-- <anIndex>. For exemple, it is usefull for
|
|
-- TDataStd_Group. It uses a mecanism based on a
|
|
-- DDF_AttributeBrowser.
|
|
|
|
Information(me)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns information about <me> to be displayed in
|
|
-- information window.
|
|
|
|
Information(me; aLab : Label from TDF)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns information about <aLab> to be displayed
|
|
-- in information window.
|
|
|
|
Information(me; anIndex : Integer from Standard = 0)
|
|
returns AsciiString from TCollection;
|
|
---Purpose: Returns information about attribute <anIndex> to
|
|
-- be displayed in information window.
|
|
|
|
|
|
fields
|
|
|
|
myDF : Data from TDF;
|
|
myAttMap : AttributeIndexedMap from TDF;
|
|
|
|
end Browser;
|