EgtInterface 1.6a7 :

- aggiunta gestione nome file di progetto e suo stato - aggiunta gestione pezzo e layer - riordino generale.
2015-01-30 08:16:05 +00:00
parent f039e22297
commit 0c41c8c631
20 changed files with 868 additions and 178 deletions
@@ -89,6 +89,7 @@ __stdcall EgtCreateCurveLine( int nParentId, const double ptIni[3], const double
   pCrvLine->SetExtrusion( vtExtrL) ;
  // inserisco la linea nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtLine(" + ToString( nParentId) + ",{" +
@@ -213,6 +214,7 @@ __stdcall EgtCreateCurveLineEx( int nParentId, const double ptIni[3], int nSepI,
   pCrvLine->SetExtrusion( vtExtrL) ;
  // inserisco la linea nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua ;
@@ -536,6 +538,7 @@ __stdcall EgtCreateCurveLinePVL( int nParentId, const double ptIni[3],
   pCrvLine->SetExtrusion( vtExtrL) ;
  // inserisco la linea nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtLinePVL(" + ToString( nParentId) + ",{" +
@@ -602,6 +605,7 @@ __stdcall EgtCreateCurveLineMinPointCurve( int nParentId,
   pCrvLine->SetExtrusion( vtExtrL) ;
  // inserisco la linea nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtLineMinPointCurve(" + ToString( nParentId) + ",{" +
@@ -653,6 +657,7 @@ __stdcall EgtCreateCurveCircle( int nParentId, const double ptCen[3],
   pCrvArc->SetExtrusion( vtExtrL) ;
  // inserisco l'arco nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvArc)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtCircle(" + ToString( nParentId) + ",{" +
@@ -709,6 +714,7 @@ __stdcall EgtCreateCurveCircleCPN( int nParentId, const double ptCen[3],
   pCrvArc->SetExtrusion( vtExtrL) ;
  // inserisco l'arco nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvArc)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtCircleCPN(" + ToString( nParentId) + ",{" +
@@ -763,6 +769,7 @@ __stdcall EgtCreateCurveCircle3P( int nParentId, const double ptP1[3],
   pCrvArc->SetExtrusion( vtExtrL) ;
  // inserisco l'arco nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvArc)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtCircle3P(" + ToString( nParentId) + ",{" +
@@ -818,6 +825,7 @@ __stdcall EgtCreateCurveArc( int nParentId,
   pCrvArc->SetExtrusion( vtExtrL) ;
  // inserisco l'arco nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvArc)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtArc(" + ToString( nParentId) + ",{" +
@@ -878,6 +886,7 @@ __stdcall EgtCreateCurveArcC2PN( int nParentId, const double ptCen[3], const dou
   pCrvArc->SetExtrusion( vtExtrL) ;
  // inserisco l'arco nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvArc)) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtArcC2PN(" + ToString( nParentId) + ",{" +
@@ -945,6 +954,7 @@ __stdcall EgtCreateCurveArc3P( int nParentId, const double ptP1[3],
         nId =  pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
      }
   }
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtArc3P(" + ToString( nParentId) + ",{" +
@@ -1014,6 +1024,7 @@ __stdcall EgtCreateCurveArc2PVN( int nParentId, const double ptStart[3], const d
         nId =  pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvLine)) ;
      }
   }
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtArc2PVN(" + ToString( nParentId) + ",{" +
@@ -1081,6 +1092,7 @@ EgtCreateCurveBezier( int nParentId, int nDegree, const PNTVECTOR& vPnt, int nRe
   pCrvBez->SetExtrusion( vtExtrL) ;
  // inserisco la curva nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvBez)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sPC ;
@@ -1152,6 +1164,7 @@ EgtCreateCurveBezierRational( int nParentId, int nDegree, const PNTUVECTOR& vPnt
   pCrvBez->SetExtrusion( vtExtrL) ;
  // inserisco la curva nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvBez)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sPC ;
@@ -1208,6 +1221,7 @@ __stdcall EgtCreateCurveBezierFromArc( int nParentId, int nArcId, BOOL bErase)
            return GDB_ID_NULL ;
      }
   }
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtCurveBezierFromArc(" + ToString( nParentId) + "," +
@@ -1285,6 +1299,7 @@ MyCreateCurveCompo( int nParentId, const INTVECTOR& vIds, bool bErase)
   pCrvCompo->SetThickness( dThick) ;
  // inserisco la curva composita nel DB
   int nId = pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvCompo)) ;
+   EgtSetModified() ;
  // se ok e richiesto, cancello le curve originali
   if ( nId != GDB_ID_NULL  &&  bErase) {
      for ( Iter = vIds.begin() ; Iter != vIds.end() ; ++Iter) {
@@ -1456,6 +1471,7 @@ EgtCreateCurveCompoByChain( int nParentId, const INTVECTOR& vIds,
 {
  // eseguo
   int nFirstId = MyCreateCurveCompoByChain( nParentId, vIds, ptNear, bErase, nRefType) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sIds ;
@@ -1511,6 +1527,7 @@ EgtCreateCurveCompoFromPoints( int nParentId, const PolyLine& PL, int nRefType)
      pCrvCompo->LocToLoc( pGeomDB->GetGridFrame(), frDest) ;
  // inserisco la curva composita nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvCompo)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sPnt ;
@@ -1564,6 +1581,7 @@ EgtCreateCurveCompoFromPointBulges( int nParentId, const PolyArc& PA, int nRefTy
      pCrvCompo->LocToLoc( pGeomDB->GetGridFrame(), frDest) ;
  // inserisco la curva composita nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvCompo)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sPnt ;
@@ -1622,6 +1640,7 @@ __stdcall EgtCreateCurveCompoByApprox( int nParentId, int nSouId, BOOL bArcsVsLi
   }
  // inserisco la curva composita nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCC)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtCurveCompoByApprox(" + ToString( nParentId) + "," +
@@ -1740,6 +1759,7 @@ __stdcall EgtCreatePolygonFromSide( int nParentId, int nNumSides, const double p
   bOk = bOk && pCrvCompo->SetExtrusion( vtExtrL) ;
  // inserisco la curva nel DB
   int nId = ( bOk ? pGeomDB->AddGeoObj( GDB_ID_NULL, nParentId, Release( pCrvCompo)) : GDB_ID_NULL) ;
+   EgtSetModified() ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtPolygonFromSide(" + ToString( nParentId) + "," +