From 9ebc7755c7c1f285f8faf65a0f9e03cc9b3a53ab Mon Sep 17 00:00:00 2001
From: Emmanuele Sassi <emmanuele.sassi@egaltech.com>
Date: Tue, 22 Jul 2025 16:51:49 +0200
Subject: [PATCH] - aggiunta funzione per apertura Jwd da stringa - aggiunta
 funzione per acquisizione svg

---
 Designing/WinLib/WinManageProject.lua | 16 ++++++++++++++++
 Designing/WinProject.lua              | 16 ++++++++++++++++
 2 files changed, 32 insertions(+)

diff --git a/Designing/WinLib/WinManageProject.lua b/Designing/WinLib/WinManageProject.lua
index 7848382..ecadebb 100644
--- a/Designing/WinLib/WinManageProject.lua
+++ b/Designing/WinLib/WinManageProject.lua
@@ -186,6 +186,7 @@ local function ConvertTableToGeometry( AreaTable, nParentId)
          ConvertTableToGeometry( AreaTable[JWD_AREA_LIST][1], nAreaId)
       end
       
+      return nAreaId
       
    -- ANTA
    elseif AreaTable[JWD_AREA_TYPE] == 'SASH' then
@@ -290,5 +291,20 @@ function WinManageProject.ReadFromFile( sFilePath, sProfileDir)
    return true
 end
 
+-- funzione che apre un file jwd
+function WinManageProject.ReadFromJwd( sJwd)
+   local tData = JSON:decode( sJwd)
+   
+   -- importo il profilo
+   local sProfilePath = _G.sProfilePath .. '\\' .. tData[JWD_PROFILE_PATH] .. '.nge'
+   if not WinCreate.ImportProfile( sProfilePath) then
+      return false
+   end
+   
+   -- creo le aree
+   return ConvertTableToGeometry( tData[JWD_AREA_LIST][1], GDB_ID.ROOT)
+   
+end
+
 ---------------------------------------------------------------------
 return WinManageProject
diff --git a/Designing/WinProject.lua b/Designing/WinProject.lua
index 45a16bd..e4b9530 100644
--- a/Designing/WinProject.lua
+++ b/Designing/WinProject.lua
@@ -226,6 +226,12 @@ local function WinCalculate_AddAccessories()
 end
 _G.WinCalculate_AddAccessories = WinCalculate_AddAccessories
 
+----------------------------------------------------------------------------------
+local function WinManage_LoadJwd()
+   WDG.AREAID = WinManageProject.ReadFromJwd( WDG.JWD)
+end
+_G.WinManage_LoadJwd = WinManage_LoadJwd
+
 ----------------------------------------------------------------------------------
 local function WinGetImage()
    -- sistemo la vista
@@ -236,6 +242,16 @@ local function WinGetImage()
 end
 _G.WinGetImage = WinGetImage
 
+----------------------------------------------------------------------------------
+local function WinGetSvg()
+   -- sistemo la vista
+   EgtSetView( SCE_VD.TOP, false)
+   EgtZoom( SCE_ZM.ALL, false)
+   -- salvo immagine
+   EgtExportSvg( GDB_ID.ROOT, WDG.FILE)
+end
+_G.WinGetSvg = WinGetSvg
+
 ----------------------------------------------------------------------------------
 local function WinSetAuxGrpStatus()
    -- recupero il gruppo aux della ferramenta e accessori e assegno stato