1 -- File: BinMNaming_NamedShapeDriver.cdl
2 -- Created: Thu Apr 8 15:09:48 2004
3 -- Author: Sergey ZARITCHNY <szy@opencascade.com>
4 -- Copyright: Open CasCade S.A. 2004
7 class NamedShapeDriver from BinMNaming inherits ADriver from BinMDF
9 ---Purpose: NamedShape Attribute Driver.
12 SRelocationTable from BinObjMgt,
13 RRelocationTable from BinObjMgt,
14 Persistent from BinObjMgt,
15 MessageDriver from CDM,
17 ShapeSet from BinTools,
18 LocationSet from BinTools
21 Create (theMessageDriver:MessageDriver from CDM)
22 returns mutable NamedShapeDriver from BinMNaming;
24 NewEmpty (me) returns mutable Attribute from TDF;
26 Paste(me; Source : Persistent from BinObjMgt;
27 Target : mutable Attribute from TDF;
28 RelocTable : out RRelocationTable from BinObjMgt)
29 returns Boolean from Standard;
31 Paste(me; Source : Attribute from TDF;
32 Target : in out Persistent from BinObjMgt;
33 RelocTable : out SRelocationTable from BinObjMgt);
35 ReadShapeSection (me: mutable; theIS: in out IStream from Standard);
36 ---Purpose: Input the shapes from Bin Document file
38 WriteShapeSection (me: mutable; theOS: in out OStream from Standard);
39 ---Purpose: Output the shapes into Bin Document file
42 ---Purpose: Clear myShapeSet
44 SetFormatNb(me: mutable; theFormat : Integer from Standard);
46 ---Purpose: set the format of topology
47 -- First : does not write CurveOnSurface UV Points into the file
48 -- on reading calls Check() method.
49 -- Second: stores CurveOnSurface UV Points.
51 GetFormatNb(me) returns Integer from Standard;
52 ---Purpose: get the format of topology
55 GetShapesLocations(me: mutable) returns LocationSet from BinTools;
56 ---Purpose: get the format of topology
62 myShapeSet : ShapeSet from BinTools;
63 myFormatNb : Integer from Standard;