- gestite le info da scrivere su un part creato da template.

This commit is contained in:
Daniele Bariletti
2025-02-21 12:17:04 +01:00
parent 6a0a872b0b
commit 205253d1cc
2 changed files with 22 additions and 1 deletions
+3
View File
@@ -314,6 +314,9 @@ local function CreateSolid()
IdEnt_Part = nIdTrimTot
SLD.CurrPartSolid = IdP_SOLID
SLD.CurrSrfTmId = nIdTrimTot
--scrivo l'info dello spessore nel part
EgtSetInfo(IdFP, "Th", EgtNumToString(SLD.THICK))
end
--
+19 -1
View File
@@ -4,7 +4,7 @@
-- Intestazioni
require( 'EgtBase')
_ENV = EgtProtectGlobal()
EgtEnableDebug( false)
EgtEnableDebug( true)
-------------------------------------------------------------------------------------------------------------------------
-- FUNZIONI BASE PER GENERARE I COMPO SOLID INIZIO
@@ -95,6 +95,19 @@ function TOOL.GetNewUUID()
TOOL.UUID = EgtGetUUID()
end
function TOOL.RenameNewPart()
if not TOOL.nId or TOOL.nId == GDB_ID.NULL then return end
local sCurrName = EgtGetName(TOOL.nId)
TOOL.GetNewUUID()
local sNewName = TOOL.UUID
if not sCurrName or sCurrName == "" then
sNewName = sNewName.."Part"
else
sNewName = sNewName..sCurrName
end
EgtSetName(TOOL.nId,sNewName)
end
local function FindEdges(nLay, tbInfo)
-- crea una tabella con gli indici degli elementi nel Layer passato (nLay) e
-- trova l'indice del lato tbInfo.nEdgeId, 1 based, restituito in tbInfo.nEdge
@@ -231,6 +244,11 @@ function TOOL.FindLayers( IdPart)
tbLayer['OutLoop'] = EgtGetFirstNameInGroup(IdPart, 'OutLoop')
tbLayer['Region'] = EgtGetFirstNameInGroup(IdPart, 'Region')
tbLayer['Ref'] = EgtGetFirstNameInGroup(IdPart, 'Ref')
-- se non esiste il layer ref, lo creo
if not tbLayer['Ref'] then
tbLayer['Ref'] = EgtGroup(IdPart)
EgtSetName(tbLayer['Ref'], 'Ref')
end
tbLayer['Labels'] = EgtGetFirstNameInGroup(IdPart, 'Labels')
tbLayer['Aux'] = EgtGetFirstNameInGroup(IdPart, 'Aux')
local nInLoopLay = EgtGetFirstNameInGroup(IdPart, 'InLoop')