Controlling THRESHOLD DIALOG BOX . . .
All
I can show the THRESHOLD DIALOG BOX with this code
'DISPLAY THE THRESHOLD DIALOG BOX With Measure.ThresholdTool.Gadgets.Histogram(Nothing) .CheckState = MediaCy.IQL.Application.McCommand.mcCheckState.Checked .Run() End With
and I can hide the THRESHOLD DIALOG BOX with this code
'HIDE THE THRESHOLD DIALOG BOX With Measure.ThresholdTool.Gadgets.Histogram(Nothing) .CheckState = MediaCy.IQL.Application.McCommand.mcCheckState.unchecked .Run() End With
but I do not seem to be able to use
Measure.ThresholdTool.Gadgets.Histogram(Nothing).CheckState
or
Measure.ThresholdTool.Gadgets.Histogram(Nothing).Checked
to see if the THRESHOLD BOX is showing or hiding.
What CODE works to determine whether the THRESHOLD DIALOG BOX is SHOWING or HIDING?
Thanks.
-- Matt
0
Best Answer
-
Hi Matt,
You should use this macro to see if the dialog is shown or not:Public Sub GetThresholdVisible Debug.Print (ThisApplication.Panels.Control("ThresholdTool") IsNot Nothing) End Sub
Yuri0
Answers
Your code looks correct and in my tests the following macro hides the dialog properly:
Public Sub HideThreshold With Measure.ThresholdTool.Gadgets.Histogram(Nothing) .CheckState = MediaCy.IQL.Application.McCommand.mcCheckState.Unchecked .Run() End With End Sub
Please test again and let me know if you still have problems.
Yuri