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,40 @@
+-- HideAll.lua by Egaltech s.r.l. 2019/03/16
+-- Gestione nascondimento di tutte le Travi non selezionate
+
+-- Intestazioni
+require( 'EgtBase')
+_ENV = EgtProtectGlobal()
+EgtEnableDebug( false)
+
+-- se non ci sono pezzi selezionati, esco
+if not EgtGetFirstSelectedObj() then return end
+
+-- nascondo tutti i pezzi non selezionati
+local bCurrPL = false
+local nPartId = EgtGetFirstPart()
+while nPartId do
+   local nStat = GDB_ST.ON
+   local nLayId = EgtGetFirstLayer( nPartId)
+   while nLayId do
+      local nEntId = EgtGetFirstInGroup( nLayId)
+      if nEntId then
+         nStat = EgtGetCalcStatus( nEntId)
+         break
+      else
+         nLayId = EgtGetNextLayer( nLayId)
+      end
+   end
+   if nStat ~= GDB_ST.SEL then
+      EgtSetMode( nPartId, GDB_MD.HIDDEN)
+   else
+      EgtDeselectPartObjs( nPartId)
+      if not bCurrPL then
+         bCurrPL = EgtSetCurrPartLayer( nPartId, EgtGetFirstLayer( nPartId))
+      end
+   end
+   nPartId = EgtGetNextPart( nPartId)
+end
+
+EgtZoom( SCE_ZM.ALL)
+
+-- end