Window :

- colori pezzi serramenti uniformi
- piccole modifiche per utilizzo manuale da EgtCAM5.

Designing/WinOpenProjectFile.lua

@@ -11,7 +11,7 @@
 -- EEEEEEEEEE      GGGGGG           TTTT
 --
 -- by Egalware s.r.l.
--- Window project software by Egalware s.r.l.   2023/05/02
+-- Window project software by Egalware s.r.l.   2026/07/24
 
 require( 'EgtBase')
 _ENV = EgtProtectGlobal()
@@ -43,17 +43,9 @@ if WINDOW and WINDOW.FILE then
    sOpenFilePath = WINDOW.FILE
 else
    -- altrimenti apro dialogo di scelta file
-   local sOpenDirPath = 'c:\\EgtData\\EgtWindowMaker\\Projects'
-   local FilePathList = EgtFindAllFiles( sOpenDirPath .. '\\*.jwd')
-   local sDialogFile = 'CB:'
-   for FilePathIndex = 1, #FilePathList do
-      local sName = EgtSplitString( FilePathList[FilePathIndex], '.')
-      sDialogFile = sDialogFile .. sName[1] .. ','
-   end
-   local DialogRes = EgtDialogBox( 'Open Window Project', { 'Nome Progetto', sDialogFile })
-   if DialogRes and DialogRes[1] then
-      sOpenFilePath = sOpenDirPath .. '\\' .. DialogRes[1] .. '.jwd'
-   else
+   local sOpenDirPath = 'c:\\EgtData\\EgtWindowMaker\\Projects\\*.jwd'
+   sOpenFilePath = EgtFileDialog( true, sOpenDirPath, "Window Project Files (*.jwd)|*.jwd||") 
+   if not sOpenFilePath then
       return
    end
 end
@@ -87,6 +79,8 @@ if WINDOW and WINDOW.TEST and WINDOW.TEST == 1 then
    if nProfileGroupId and nProfileGroupId ~= GDB_ID.NULL then
       EgtErase( nProfileGroupId)
    end
+else
+   EgtSaveFile()
 end
 
 EgtZoom( SCE_ZM.ALL)