DataWindow :

- aggiunta preview soglia.
This commit is contained in:
SaraP
2025-12-22 12:12:15 +01:00
parent c8a7fa0c11
commit 499ff1f245
+22
View File
@@ -7099,6 +7099,22 @@ local function CalcFillPreview( nPartId, nPreviewGrp)
EgtErase( nCompoOutlineId)
end
----------------------------------------------------------------------------------
local function CalcThresholdPreview( nAreaId, nPreviewGrp)
-- recupero il bottom del telaio
local nOutlineGrpId = EgtGetFirstNameInGroup( nAreaId, WIN_OUTLINE)
local nBottomId = EgtGetFirstNameInGroup( nOutlineGrpId, WIN_BOTTOM)
local nProfileId = GetOutlineProfileId( nBottomId, false)
local b3Profile = GetProfileLocalBox( nProfileId)
-- creo il rettangolo della soglia e lo posiziono sullo sfondo
local ptOrig = EgtSP( nBottomId)
local nSurfId = EgtSurfFrRectangle( nPreviewGrp, ptOrig, ptOrig + EgtCurveLength( nBottomId) * X_AX() + b3Profile:getDimX() * Y_AX())
EgtSetColor( nSurfId, Color3d( 128, 128, 128))
EgtMove( nSurfId, - 500 * Z_AX())
local nCompoId = EgtExtractSurfFrChunkLoops( nSurfId, 0, nPreviewGrp)
EgtSetColor( nCompoId, EgtStdColor( 'BLACK'))
end
----------------------------------------------------------------------------------
local function CalcHardwarePreview( nAreaId, nPreviewGrp)
@@ -7163,6 +7179,12 @@ local function CalcPreview( nFrameId)
nPartId = EgtGetNextPart( nPartId)
end
-- preview soglia
local bThreshold = EgtGetInfo( nFrameId, WIN_THRESHOLD, 'b') or false
if bThreshold then
CalcThresholdPreview( nFrameId, nPreviewGrp)
end
-- copio i disegni di apertura delle ante dal gruppo delle aree
local vStack = { nFrameId}
local i = 1