EgtInterface 1.5k3 :

- esposte ulteriori funzionalità.
2014-11-21 17:46:17 +00:00
parent 73c8bd68b0
commit 4661bb7c66
13 changed files with 629 additions and 276 deletions
@@ -264,6 +264,27 @@ __stdcall EgtModifyCurveCircleCPN( int nId, const double ptOn[3])
   }
 }

+//-------------------------------------------------------------------------------
+BOOL
+__stdcall EgtModifyCurveArcRadius( int nId, double dRad)
+{
+   IGeomDB* pGeomDB = GetCurrGeomDB() ;
+   VERIFY_GEOMDB( pGeomDB, FALSE)
+  // recupero l'arco e i suoi dati
+   ICurveArc* pArc = GetCurveArc( pGeomDB->GetGeoObj( nId)) ;
+   if ( pArc == nullptr)
+      return FALSE ;
+   double dOldRad = pArc->GetRadius() ;
+  // imposto il nuovo raggio
+   if ( pArc->ChangeRadius( dRad))
+      return TRUE ;
+  // in caso di errore, ripristino i vecchi dati
+   else {
+      pArc->ChangeRadius( dOldRad) ;
+      return FALSE ;
+   }
+}
+
 //-------------------------------------------------------------------------------
 BOOL
 __stdcall EgtModifyCurveArcC2PN( int nId, const double ptEnd[3])