1 // SMESH SMESH_I : idl implementation based on 'SMESH' unit's calsses
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 // File : StdMeshers_LocalLength_i.cxx
25 // Moved here from SMESH_LocalLength_i.cxx
26 // Author : Paul RASCLE, EDF
31 #include "StdMeshers_LocalLength_i.hxx"
32 #include "SMESH_Gen_i.hxx"
33 #include "SMESH_Gen.hxx"
35 #include "Utils_CorbaException.hxx"
36 #include "utilities.h"
38 #include <TCollection_AsciiString.hxx>
40 //=============================================================================
42 * StdMeshers_LocalLength_i::StdMeshers_LocalLength_i
46 //=============================================================================
48 StdMeshers_LocalLength_i::StdMeshers_LocalLength_i( PortableServer::POA_ptr thePOA,
50 ::SMESH_Gen* theGenImpl )
51 : SALOME::GenericObj_i( thePOA ),
52 SMESH_Hypothesis_i( thePOA )
54 MESSAGE( "StdMeshers_LocalLength_i::StdMeshers_LocalLength_i" );
55 myBaseImpl = new ::StdMeshers_LocalLength( theGenImpl->GetANewId(),
60 //=============================================================================
62 * StdMeshers_LocalLength_i::~StdMeshers_LocalLength_i
66 //=============================================================================
68 StdMeshers_LocalLength_i::~StdMeshers_LocalLength_i()
70 MESSAGE( "StdMeshers_LocalLength_i::~StdMeshers_LocalLength_i" );
73 //=============================================================================
75 * StdMeshers_LocalLength_i::SetLength
79 //=============================================================================
81 void StdMeshers_LocalLength_i::SetLength( CORBA::Double theLength )
82 throw ( SALOME::SALOME_Exception )
84 MESSAGE( "StdMeshers_LocalLength_i::SetLength" );
87 this->GetImpl()->SetLength( theLength );
89 catch ( SALOME_Exception& S_ex ) {
90 THROW_SALOME_CORBA_EXCEPTION( S_ex.what(),
94 // Update Python script
95 TCollection_AsciiString aStr, aStrLen ((double)theLength);
96 SMESH_Gen_i::AddObject(aStr, _this()) += ".SetLength(";
97 aStr += aStrLen + ")";
99 SMESH_Gen_i::AddToCurrentPyScript(aStr);
102 //=============================================================================
104 * StdMeshers_LocalLength_i::GetLength
108 //=============================================================================
110 CORBA::Double StdMeshers_LocalLength_i::GetLength()
112 MESSAGE( "StdMeshers_LocalLength_i::GetLength" );
113 ASSERT( myBaseImpl );
114 return this->GetImpl()->GetLength();
117 //=============================================================================
119 * StdMeshers_LocalLength_i::GetImpl
123 //=============================================================================
125 ::StdMeshers_LocalLength* StdMeshers_LocalLength_i::GetImpl()
127 MESSAGE( "StdMeshers_LocalLength_i::GetImpl" );
128 return ( ::StdMeshers_LocalLength* )myBaseImpl;