1 -- Created on: 1996-12-16
2 -- Created by: Christian CAILLET
3 -- Copyright (c) 1996-1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
6 -- This file is part of Open CASCADE Technology software library.
8 -- This library is free software; you can redistribute it and/or modify it under
9 -- the terms of the GNU Lesser General Public License version 2.1 as published
10 -- by the Free Software Foundation, with special exception defined in the file
11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 -- distribution for complete text of the license and disclaimer of any warranty.
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
17 class SelectNamed from StepData inherits SelectMember
19 ---Purpose : This select member can be of any kind, and be named
20 -- But its takes more memory than some specialised ones
21 -- This class allows one name for the instance
23 uses CString, Logical, AsciiString from TCollection, Field from StepData
27 Create returns SelectNamed;
29 HasName (me) returns Boolean is redefined;
31 Name (me) returns CString is redefined;
33 SetName (me : mutable; name : CString) returns Boolean is redefined;
34 -- redefined to accept any name
36 Field (me) returns Field;
37 ---C++ : return const &
39 CField (me : mutable) returns Field;
43 Kind (me) returns Integer is redefined;
44 -- see Field for Kind (same codes)
46 SetKind (me : mutable; kind : Integer) is redefined;
47 -- called by various Set*
49 Int (me) returns Integer is redefined;
50 ---Purpose : This internal method gives access to a value implemented by an
51 -- Integer (to read it)
53 SetInt (me : mutable; val : Integer) is redefined;
54 ---Purpose : This internal method gives access to a value implemented by an
55 -- Integer (to set it)
57 Real (me) returns Real is redefined;
59 SetReal (me : mutable; val : Real) is redefined;
61 String (me) returns CString is redefined;
63 SetString (me : mutable; val : CString) is redefined;
67 thename : AsciiString;
68 theval : Field from StepData;