diff --git a/Profiles/WinLib/WinCalculate.lua b/Profiles/WinLib/WinCalculate.lua index 6d900fc..a3f3066 100644 --- a/Profiles/WinLib/WinCalculate.lua +++ b/Profiles/WinLib/WinCalculate.lua @@ -2403,7 +2403,7 @@ local function SearchSash( nAreaId, SashList) end -- funzione che aggiunge l'hardware -function WinCalculate.AddHardwareForSash( nFrameId) +function WinCalculate.AddHardwareForSash( nFrameId, bOnlyRequest) -- cerco ed indicizzo ante del serramento local SashList = {} SearchSash( nFrameId, SashList) @@ -2496,9 +2496,13 @@ function WinCalculate.AddHardwareForSash( nFrameId) -- Scrittura nuova linea fhInput:write( sText .. '\n') - -- Chiudo file CNC + -- Chiudo file fhInput:close() + if bOnlyRequest then + return sInputFile + end + -- attendo scrittura output local nWait = 0 while not EgtExistsFile( sOutputFile) and nWait < 20 do diff --git a/Profiles/WinProject.lua b/Profiles/WinProject.lua index 2c40235..9ff2005 100644 --- a/Profiles/WinProject.lua +++ b/Profiles/WinProject.lua @@ -106,4 +106,9 @@ local function WinCalculate_AddHardware() end _G.WinCalculate_AddHardware = WinCalculate_AddHardware +local function WinCreate_GetHardwareOptionPath() + WDG.HWDOPTPATH = WinCalculate.AddHardwareForSash(WDG.AREAID, true) +end +_G.WinCreate_GetHardwareOptionPath = WinCreate_GetHardwareOptionPath + ---------------------------------------------------------------------