DataWall :

- correzione per nesting.
This commit is contained in:
DarioS
2021-05-25 12:28:22 +02:00
parent d4a17e13fd
commit e45b887189
+8
View File
@@ -197,6 +197,12 @@ for nPartId, nCount in pairs( PART) do
end
-- altrimenti cerco la regione sopra
else
-- cancello precedenti contorni calcolati
local nOldONId = EgtGetFirstNameInGroup( nOutlineLayer, 'ON_TMP')
if nOldONId then
EgtErase( nOldONId)
end
-- cerco la regione sopra
local nReg
for i = 1, 4 do
local sRegName = string.format( '%d-Top', i)
@@ -209,12 +215,14 @@ for nPartId, nCount in pairs( PART) do
if not nReg then
EgtOutLog("Errore: regione superiore non trovata")
end
-- recupero contorno della regione
local OutId, nCnt = EgtExtractSurfFrChunkLoops( nReg, 0, nOutlineLayer)
if OutId and nCnt > 1 then
for i = 2, nCnt do
EgtErase( OutId + i - 1)
end
end
EgtSetName( OutId, 'ON_TMP')
nOutline = OutId
end