DarioS
57 lines
1.9 KiB
Lua
57 lines
1.9 KiB
Lua
-- RunMaterialParamEdit.lua by Egaltech s.r.l. 2022/04/09
|
|
-- Gestione edit parametri materiali per Stampa 3d
|
|
|
|
-- Tabella per definizione modulo
|
|
local RunMaterialParamEdit = {}
|
|
|
|
-- Intestazioni
|
|
require( 'EgtBase')
|
|
|
|
EgtOutLog( ' RunMaterialParamEdit started', 1)
|
|
|
|
-- Costanti generali
|
|
local AMD = require( 'AddManData')
|
|
|
|
---------------------------------------------------------------------
|
|
function RunMaterialParamEdit.Exec()
|
|
-- recupero cartella dei materiali
|
|
local sCalcBaseDir = EgtGetStringFromIni( '3dPrinting', 'BaseDir', 'C:\\ProgramData\\Egaltech\\EgtCam5\\3dPrinting', EgtGetIniFile())
|
|
local sMaterialDirPath = sCalcBaseDir .. '\\Materials\\'
|
|
|
|
-- recupero elenco file dei materiali
|
|
local Files = EgtFindAllFiles( sMaterialDirPath..'*.csv')
|
|
if not Files then
|
|
EgtOutBox( 'Material files not found', 'Error', 'ERROR')
|
|
return
|
|
end
|
|
local sMaterials = ''
|
|
for i = 1, #Files do
|
|
local sDir, sFile, sExt = EgtSplitPath( Files[i])
|
|
if sMaterials ~= "" then
|
|
sMaterials = sMaterials .. ','
|
|
end
|
|
sMaterials = sMaterials .. sFile
|
|
end
|
|
|
|
-- chiedo quale file aprire
|
|
MaterialValues = EgtDialogBox( 'Materials edit', { 'Material', 'CB:' .. sMaterials})
|
|
if not MaterialValues or #MaterialValues < 1 then return end
|
|
|
|
-- verifico esistenza file
|
|
local sSelMaterialPath = sMaterialDirPath .. MaterialValues[1] .. '.csv'
|
|
if not EgtExistsFile( sSelMaterialPath) then
|
|
EgtOutBox( 'Material file not found', 'Error', 'ERROR')
|
|
return
|
|
end
|
|
|
|
-- apro programma di edit
|
|
local sEditProgPath = EgtGetStringFromIni( '3dPrinting', RESULT_READ_PROG, "", EgtGetIniFile())
|
|
if not sEditProgPath or not EgtWinExec( '"'..sEditProgPath..'" "'..sSelMaterialPath..'"') then
|
|
EgtOutBox( 'Impossible opening software to show Material. You can find them it in ' .. sSelMaterialPath, 'Error', 'ERROR')
|
|
end
|
|
|
|
end
|
|
|
|
---------------------------------------------------------------------
|
|
return RunMaterialParamEdit
|