- aggiunte opzioni per ferramenta

Profiles/WinProject.lua

@@ -35,6 +35,26 @@ local WinManageProject = require( 'WinManageProject')
 -- WDG
 
 -- funzioni
+----------------------------------------------------------------------------------
+local function GetVariableList( sName)
+   local List = {}
+   local nIndex = 1
+   while WDG[sName .. nIndex] do
+      table.insert(List, WDG['JOINT' .. nIndex])
+      nIndex = nIndex + 1
+   end
+   return List
+end
+
+----------------------------------------------------------------------------------
+local function CleanVariableList( sName)
+   local nIndex = 1
+   while WDG[sName .. nIndex] do
+      WDG[sName .. nIndex] = nil
+      nIndex = nIndex + 1
+   end
+end
+
 ----------------------------------------------------------------------------------
 local function WinCreate_ImportProfile()
     WinCreate.ImportProfile(WDG.PROFILE)
@@ -43,13 +63,17 @@ _G.WinCreate_ImportProfile = WinCreate_ImportProfile
 
 ----------------------------------------------------------------------------------
 local function WinCreate_CreateFrame()
-   WDG.AREAID = WinCreate.CreateFrame( WDG.FRAMETYPE, {WDG.JOINT1, WDG.JOINT2, WDG.JOINT3, WDG.JOINT4, WDG.JOINT1}, WDG.WIDTH, WDG.HEIGHT, WDG.HEIGHT2)
+   local JointList = GetVariableList('JOINT')
+   WDG.AREAID = WinCreate.CreateFrame(WDG.FRAMETYPE, JointList, WDG.WIDTH, WDG.HEIGHT, WDG.HEIGHT2)
+   CleanVariableList('JOINT')
 end
 _G.WinCreate_CreateFrame = WinCreate_CreateFrame
 
 ----------------------------------------------------------------------------------
 local function WinCreate_AddSash()
+   local JointList = GetVariableList('JOINT')
    WDG.AREAID = WinCreate.AddSash( WDG.AREAID, {WDG.JOINTBL, WDG.JOINTBR, WDG.JOINTTR, WDG.JOINTTL, WDG.JOINTBL}, WDG.SASHTYPE, WDG.OPENINGTYPE)
+   CleanVariableList('JOINT')
 end
 _G.WinCreate_AddSash = WinCreate_AddSash