Files
egwwindowlua/Profiles/WinOpenProjectFile.lua
T
Emmanuele Sassi a550ccc3ed Primo commit:
- progettazione serramenti rettangolari , ad arco e di forma generica
- gestione vetrifissi, ante, divisioni, montanti, ante battenti e riceventi
- costruzione solidi
- scrittura e lettura file jwd
- inizio creazione test
- inizio gestione spine
2023-12-12 16:30:52 +01:00

62 lines
1.7 KiB
Lua

--
-- EEEEEEEEEE GGGGGG TTTTTTTTTTTTTT
-- EEEEEEEEEE GGGGGGGGGG TTTTTTTTTTTTTT
-- EEEE GGGG GGGG TTTT
-- EEEE GGGG TTTT
-- EEEEEEE GGGG GGGGGGG TTTT
-- EEEEEEE GGGG GGGGGGG TTTT
-- EEEE GGGG GGGG TTTT
-- EEEE GGGG GGGG TTTT
-- EEEEEEEEEE GGGGGGGGGG TTTT
-- EEEEEEEEEE GGGGGG TTTT
--
-- by Egalware s.r.l.
-- Window project software by Egalware s.r.l. 2023/05/02
require( 'EgtBase')
_ENV = EgtProtectGlobal()
EgtEnableDebug( true)
-- EgtEnableDebug( false)
-- Imposto direttorio per librerie
local sBaseDir = EgtGetSourceDir()
EgtOutLog("BaseDir=" .. sBaseDir)
EgtAddToPackagePath( sBaseDir .. '?.lua')
EgtAddToPackagePath( sBaseDir .. 'WinLib\\' .. '?.lua')
_G.package.loaded.WinConst = nil
require( 'WinConst')
_G.package.loaded.WinCreate = nil
local WinCreate = require( 'WinCreate')
_G.package.loaded.WinCalculate = nil
local WinCalculate = require( 'WinCalculate')
_G.package.loaded.WinManageProject = nil
local WinManageProject = require( 'WinManageProject')
-- ciclo principale
EgtStartCounter()
EgtNewFile()
local sOpeneDirPath = 'c:\\EgtData\\Window\\Projects'
local sFileName = 'RoundArc_TripleVerticalSash.jwd'
local sOpenFilePath = sOpeneDirPath .. '\\' .. sFileName
if WINDOW and WINDOW.FILE then
sOpenFilePath = WINDOW.FILE
end
WinManageProject.ReadFromFile( sOpenFilePath)
-- imposto se calcolare i solidi o meno
WinCalculate.SetCalcSolid( true)
-- creo i pezzi
local nFrameId = EgtGetFirstNameInGroup( GDB_ID.ROOT, WIN_AREAASTERISK)
WinCalculate.CreatePartFromArea( nFrameId)
EgtZoom( SCE_ZM.ALL)
-- riporto tempi di esecuzione
local sOut = string.format( ' ExecTime = %.2f ms', EgtStopCounter())
EgtOutLog( sOut)