DataBeam :

- primo rilascio.
2019-04-01 15:18:51 +00:00
parent ab6345a4ba
commit 6eaba8a577
51 changed files with 7856 additions and 0 deletions
@@ -0,0 +1,32 @@
+-- DisableFeatures.lua by Egaltech s.r.l. 2018/04/25
+-- Gestione disabilitazione delle feature selezionate
+
+-- Intestazioni
+require( 'EgtBase')
+_ENV = EgtProtectGlobal()
+EgtEnableDebug( false)
+
+if EgtGetSelectedObjCount() == 0 then
+   EgtOutBox( 'Nessuna lavorazione selezionata', 'Disabilita lavorazioni', 'ERROR')
+end
+
+local nId = EgtGetFirstSelectedObj() 
+while nId do
+   -- verifico sia una feature
+   local nParentId = EgtGetParent( nId)
+   if  EgtIsLayer( nParentId)  and  EgtGetName( nParentId) == 'Processings'  and
+       EgtGetInfo( nId, 'GRP', 'i')  and  EgtGetInfo( nId, 'PRC', 'i')  then
+      EgtSetInfo( nId, 'DO', 0)
+      EgtSetColor( nId, Color3d( 160, 160, 160))
+      local nAuxId = EgtGetInfo( nId, 'AUXID', 'i')
+      if nAuxId then
+         EgtSetColor( nId + nAuxId, Color3d( 160, 160, 160))
+      end
+   end
+   nId = EgtGetNextSelectedObj()
+end
+
+EgtDeselectAll() 
+EgtZoom( SCE_ZM.ALL)
+
+-- end