From 2095d0accf153cdfa713d2e973c4e8e840f38974 Mon Sep 17 00:00:00 2001 From: Emmanuele Sassi Date: Fri, 26 Jul 2024 10:19:19 +0200 Subject: [PATCH] - aggiunta funzione per lettura opzioni hardware --- Profiles/WinLib/WinCalculate.lua | 8 ++++++-- Profiles/WinProject.lua | 5 +++++ 2 files changed, 11 insertions(+), 2 deletions(-) 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 + ---------------------------------------------------------------------