1 -- Created on: 1999-09-08
2 -- Created by: Andrey BETENEV
3 -- Copyright (c) 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 MeasureRepresentationItem from StepRepr
18 inherits RepresentationItem from StepRepr
20 ---Purpose: Implements a measure_representation_item entity
21 -- which is used for storing validation properties
22 -- (e.g. area) for shapes
25 HAsciiString from TCollection,
27 MeasureWithUnit from StepBasic,
28 MeasureValueMember from StepBasic
31 Create returns MeasureRepresentationItem;
32 ---Purpose: Creates empty object
35 aName : HAsciiString from TCollection;
36 aValueComponent : MeasureValueMember from StepBasic;
37 aUnitComponent : Unit from StepBasic);
38 ---Purpose: Init all fields
40 SetMeasure (me: mutable; Measure: MeasureWithUnit from StepBasic);
41 Measure (me) returns MeasureWithUnit from StepBasic;
44 myMeasure: MeasureWithUnit from StepBasic;
46 end MeasureRepresentationItem;