mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-11 10:44:53 +03:00
99 lines
2.8 KiB
C++
Executable File
99 lines
2.8 KiB
C++
Executable File
//--------------------------------------------------------------------
|
|
//
|
|
// File Name : IGESDefs_GenericData.cxx
|
|
// Date :
|
|
// Author : CKY / Contract Toubro-Larsen
|
|
// Copyright : MATRA-DATAVISION 1993
|
|
//
|
|
//--------------------------------------------------------------------
|
|
|
|
// rln 11.05.2000 BUC60660
|
|
|
|
#include <IGESDefs_GenericData.ixx>
|
|
#include <TColStd_HArray1OfReal.hxx>
|
|
#include <IGESData_HArray1OfIGESEntity.hxx>
|
|
#include <Interface_HArray1OfHAsciiString.hxx>
|
|
#include <Interface_Macros.hxx>
|
|
|
|
|
|
IGESDefs_GenericData::IGESDefs_GenericData () { }
|
|
|
|
|
|
void IGESDefs_GenericData::Init
|
|
(const Standard_Integer nbPropVal,
|
|
const Handle(TCollection_HAsciiString)& aName,
|
|
const Handle(TColStd_HArray1OfInteger)& allTypes,
|
|
const Handle(TColStd_HArray1OfTransient)& allValues)
|
|
{
|
|
// rln May 11, 2000 BUC60660
|
|
// Number of TYPE/VALUE pairs is 0 and arrays are null handles,
|
|
// this caused exception
|
|
if ( !allTypes.IsNull() && !allValues.IsNull() &&
|
|
(allValues->Lower() != 1 || allTypes->Lower() != 1 ||
|
|
allTypes->Length() != allValues->Length() ) )
|
|
Standard_DimensionMismatch::Raise("IGESDefs_GenericData: Init");
|
|
theNbPropertyValues = nbPropVal;
|
|
theName = aName;
|
|
theTypes = allTypes;
|
|
theValues = allValues;
|
|
InitTypeAndForm(406,27);
|
|
}
|
|
|
|
Standard_Integer IGESDefs_GenericData::NbPropertyValues () const
|
|
{
|
|
// return 2 * theTypes->Length() + 2;
|
|
return theNbPropertyValues;
|
|
}
|
|
|
|
Handle(TCollection_HAsciiString) IGESDefs_GenericData::Name () const
|
|
{
|
|
return theName;
|
|
}
|
|
|
|
Standard_Integer IGESDefs_GenericData::NbTypeValuePairs () const
|
|
{
|
|
return theTypes->Length();
|
|
}
|
|
|
|
Standard_Integer IGESDefs_GenericData::Type (const Standard_Integer Index) const
|
|
{
|
|
return theTypes->Value(Index);
|
|
}
|
|
|
|
Handle(Standard_Transient) IGESDefs_GenericData::Value
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return theValues->Value(Index);
|
|
}
|
|
|
|
Standard_Integer IGESDefs_GenericData::ValueAsInteger
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return GetCasted(TColStd_HArray1OfInteger,theValues->Value(Index))->Value(1);
|
|
}
|
|
|
|
Standard_Real IGESDefs_GenericData::ValueAsReal
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return GetCasted(TColStd_HArray1OfReal,theValues->Value(Index))->Value(1);
|
|
}
|
|
|
|
Handle(TCollection_HAsciiString) IGESDefs_GenericData::ValueAsString
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return GetCasted(TCollection_HAsciiString,theValues->Value(Index));
|
|
}
|
|
|
|
Handle(IGESData_IGESEntity) IGESDefs_GenericData::ValueAsEntity
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return GetCasted(IGESData_IGESEntity,theValues->Value(Index));
|
|
}
|
|
|
|
Standard_Boolean IGESDefs_GenericData::ValueAsLogical
|
|
(const Standard_Integer Index) const
|
|
{
|
|
return (GetCasted(TColStd_HArray1OfInteger,theValues->Value(Index))->Value(1)
|
|
!= 0);
|
|
}
|