DataWindow :

- aggiunta funzione che restituisce i profili dei vari pezzi di un'area telaio o anta.
2026-01-23 12:47:10 +01:00
parent c2946b8d9c
commit b27b0e6bf6
3 changed files with 29 additions and 5 deletions
@@ -489,4 +489,18 @@ local function WinGetSashShape()
      end
   end
 end
-_G.WinGetSashShape = WinGetSashShape
+_G.WinGetSashShape = WinGetSashShape
+
+----------------------------------------------------------------------------------
+local function WinGetAreaProfiles()
+   -- recupero gli id geometrici delle aree richieste
+   local vAreaNbrs = GetVariableList( 'AREANBR')
+   local vAreaIds = GetAreaIdsFromNumbers( vAreaNbrs)
+   -- ricavo le forme
+   for i = 1, #vAreaIds do
+      if vAreaIds[i] ~= GDB_ID.NULL then
+         WDG['AREAPROFILES' .. tostring( i)] = EgtGetInfo( vAreaIds[i], WIN_AREA_PROFILES, 'vs')
+      end
+   end
+end
+_G.WinGetAreaProfiles = WinGetAreaProfiles