include/opencascade/StdLPersistent_Variable.hxx

0001 // Copyright (c) 2015 OPEN CASCADE SAS
0002 //
0003 // This file is part of Open CASCADE Technology software library.
0004 //
0005 // This library is free software; you can redistribute it and/or modify it under
0006 // the terms of the GNU Lesser General Public License version 2.1 as published
0007 // by the Free Software Foundation, with special exception defined in the file
0008 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
0009 // distribution for complete text of the license and disclaimer of any warranty.
0010 //
0011 // Alternatively, this file may be used under the terms of Open CASCADE
0012 // commercial license or contractual agreement.
0013
0014 #ifndef _StdLPersistent_Variable_HeaderFile
0015 #define _StdLPersistent_Variable_HeaderFile
0016
0017 #include <StdObjMgt_Attribute.hxx>
0018 #include <StdLPersistent_HString.hxx>
0019
0020 #include <TDataStd_Variable.hxx>
0021
0022 class StdLPersistent_Variable : public StdObjMgt_Attribute<TDataStd_Variable>
0023 {
0024 public:
0025   //! Empty constructor.
0026   StdLPersistent_Variable()
0027       : myIsConstant(Standard_False)
0028   {
0029   }
0030
0031   //! Read persistent data from a file.
0032   inline void Read(StdObjMgt_ReadData& theReadData) { theReadData >> myIsConstant >> myUnit; }
0033
0034   //! Write persistent data to a file.
0035   inline void Write(StdObjMgt_WriteData& theWriteData) const
0036   {
0037     theWriteData << myIsConstant << myUnit;
0038   }
0039
0040   //! Gets persistent child objects
0041   inline void PChildren(StdObjMgt_Persistent::SequenceOfPersistent& theChildren) const
0042   {
0043     theChildren.Append(myUnit);
0044   }
0045
0046   //! Returns persistent type name
0047   inline Standard_CString PName() const { return "PDataStd_Variable"; }
0048
0049   //! Import transient attribute from the persistent data.
0050   void Import(const Handle(TDataStd_Variable)& theAttribute) const
0051   {
0052     theAttribute->Constant(myIsConstant);
0053     if (myUnit)
0054       theAttribute->Unit(myUnit->Value()->String());
0055   }
0056
0057 private:
0058   Standard_Boolean                      myIsConstant;
0059   Handle(StdLPersistent_HString::Ascii) myUnit;
0060 };
0061
0062 #endif