0024530: TKMesh - remove unused package IntPoly
[occt.git] / src / APIHeaderSection / APIHeaderSection_EditHeader.cdl
CommitLineData
b311480e 1-- Created on: 1998-07-08
2-- Created by: Christian CAILLET
3-- Copyright (c) 1998-1999 Matra Datavision
973c2be1 4-- Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5--
973c2be1 6-- This file is part of Open CASCADE Technology software library.
b311480e 7--
973c2be1 8-- This library is free software; you can redistribute it and / or modify it
9-- under the terms of the GNU Lesser General Public 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.
b311480e 13--
973c2be1 14-- Alternatively, this file may be used under the terms of Open CASCADE
15-- commercial license or contractual agreement.
7fd59977 16
17class EditHeader from APIHeaderSection inherits Editor from IFSelect
18
19uses Transient, AsciiString, HAsciiString, InterfaceModel, EditForm
20
21is
22
23 Create returns EditHeader;
24
25 Label (me) returns AsciiString;
26
27 Recognize (me; form : EditForm) returns Boolean;
28
29 StringValue (me; form : EditForm; num : Integer)
30 returns HAsciiString from TCollection;
31
32 Apply (me; form : EditForm; ent : Transient; model : InterfaceModel)
33 returns Boolean;
34
35 Load (me; form : EditForm; ent : Transient; model : InterfaceModel)
36 returns Boolean;
37
38end EditHeader;