Window :
- colori pezzi serramenti uniformi - piccole modifiche per utilizzo manuale da EgtCAM5.
This commit is contained in:
@@ -3710,13 +3710,14 @@ local function CreateOutlinePart( nOutlineId, sName, dDim, nBottomRail)
|
||||
EgtSetName( nPartId, sPartName)
|
||||
|
||||
-- imposto colore
|
||||
if sOutlineName == WIN_BOTTOM or sOutlineName == WIN_TOP or nBottomRail then
|
||||
EgtSetColor( nPartId, Color3d( 204, 102, 0))
|
||||
elseif sOutlineName == WIN_RIGHT or sOutlineName == WIN_LEFT then
|
||||
EgtSetColor( nPartId, Color3d( 251, 128, 4))
|
||||
else
|
||||
EgtSetColor( nPartId, Color3d( 255, 159, 57))
|
||||
end
|
||||
EgtSetColor( nPartId, Color3d( 204, 102, 0))
|
||||
--if sOutlineName == WIN_BOTTOM or sOutlineName == WIN_TOP or nBottomRail then
|
||||
-- EgtSetColor( nPartId, Color3d( 204, 102, 0))
|
||||
--elseif sOutlineName == WIN_RIGHT or sOutlineName == WIN_LEFT then
|
||||
-- EgtSetColor( nPartId, Color3d( 251, 128, 4))
|
||||
--else
|
||||
-- EgtSetColor( nPartId, Color3d( 255, 159, 57))
|
||||
--end
|
||||
|
||||
-- creo il profilo associato al pezzo con la dimensione opportuna
|
||||
CreatePartProfile( nPartId, nOutlineId, dDim, nBottomRail)
|
||||
@@ -4927,6 +4928,7 @@ local function CalcGeo( nPartId, nOutlineId)
|
||||
-- creo layer per ingombro
|
||||
local nGeoLayerId = EgtGroup( nPartId)
|
||||
EgtSetName( nGeoLayerId, WIN_GEO)
|
||||
EgtSetStatus( nGeoLayerId, GDB_ST.OFF)
|
||||
|
||||
-- recupero il tipo di giunzioni
|
||||
local vStartJoints
|
||||
@@ -4964,6 +4966,8 @@ local function CalcFillGeo( nPartId, nOutlineLayerId)
|
||||
-- creo layer per ingombro
|
||||
local nGeoLayerId = EgtGroup( nPartId)
|
||||
EgtSetName( nGeoLayerId, WIN_GEO)
|
||||
EgtSetStatus( nGeoLayerId, GDB_ST.OFF)
|
||||
|
||||
-- copio lati da Outline
|
||||
local vOutlineIds = EgtGetAllInGroup( nOutlineLayerId)
|
||||
for i = 1, #vOutlineIds do
|
||||
@@ -6729,7 +6733,9 @@ local function CalcSolid( nPartId, nOutlineId)
|
||||
for i = 1, #vTrimEnd do
|
||||
EgtSurfTmIntersect( nMainExtrusionId, vTrimEnd[i])
|
||||
end
|
||||
|
||||
|
||||
EgtSurfTmSetShowEdges( nMainExtrusionId, true)
|
||||
|
||||
return nMainExtrusionId
|
||||
end
|
||||
|
||||
|
||||
Reference in New Issue
Block a user