mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-26 10:19:45 +03:00
74 lines
1.9 KiB
Plaintext
Executable File
74 lines
1.9 KiB
Plaintext
Executable File
-- File: STEPCAFControl_ExternFile.cdl
|
|
-- Created: Thu Sep 28 16:16:22 2000
|
|
-- Author: Andrey BETENEV
|
|
-- <abv@doomox.nnov.matra-dtv.fr>
|
|
---Copyright: Matra Datavision 2000
|
|
|
|
|
|
class ExternFile from STEPCAFControl inherits TShared from MMgt
|
|
|
|
---Purpose: Auxiliary class serving as container for data resulting
|
|
-- from translation of external file
|
|
|
|
uses
|
|
HAsciiString from TCollection,
|
|
ReturnStatus from IFSelect,
|
|
WorkSession from XSControl,
|
|
Shape from TopoDS,
|
|
Label from TDF
|
|
|
|
is
|
|
|
|
Create returns ExternFile;
|
|
---Purpose: Creates an empty structure
|
|
|
|
SetWS (me: mutable; WS: WorkSession from XSControl);
|
|
---C++: inline
|
|
GetWS (me) returns WorkSession from XSControl;
|
|
---C++: inline
|
|
|
|
SetLoadStatus (me: mutable; stat: ReturnStatus from IFSelect);
|
|
---C++: inline
|
|
GetLoadStatus (me) returns ReturnStatus from IFSelect;
|
|
---C++: inline
|
|
|
|
SetTransferStatus (me: mutable; isok: Boolean);
|
|
---C++: inline
|
|
GetTransferStatus (me) returns Boolean;
|
|
---C++: inline
|
|
|
|
SetWriteStatus (me: mutable; stat: ReturnStatus from IFSelect);
|
|
---C++: inline
|
|
GetWriteStatus (me) returns ReturnStatus from IFSelect;
|
|
---C++: inline
|
|
|
|
SetName (me: mutable; name: HAsciiString from TCollection);
|
|
---C++: inline
|
|
GetName (me) returns HAsciiString from TCollection;
|
|
---C++: inline
|
|
|
|
-- SetShape (me: mutable; S: Shape from TopoDS);
|
|
---C++: inline
|
|
-- GetShape (me) returns Shape from TopoDS;
|
|
---C++: inline
|
|
|
|
SetLabel (me: mutable; L: Label from TDF);
|
|
---C++: inline
|
|
GetLabel (me) returns Label from TDF;
|
|
---C++: inline
|
|
|
|
fields
|
|
|
|
myWS : WorkSession from XSControl;
|
|
|
|
myLoadStatus: ReturnStatus from IFSelect;
|
|
myTransferStatus: Boolean;
|
|
myWriteStatus: ReturnStatus from IFSelect;
|
|
|
|
myName: HAsciiString from TCollection;
|
|
|
|
-- myShape: Shape from TopoDS;
|
|
myLabel: Label from TDF;
|
|
|
|
end ExternFile;
|