mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-01 10:26:12 +03:00
ccadc126ba
Usage of QAGetPixelColor were checked and corrected. Using simple comparison instead of regexp. Improved usage of command vreadpixel for standard colors. Command QAGetPixelColor was dropped from TKQADraw. Procedures "checkcolor" and auxiliary "checkpoint" were moved to DrawResources/TestCommands.tcl Some test cases using "checkcolor" for picking line color were simplified. Procedures checkcolor and checkpoint were changed to handle situation when pixel is out of view. Removed unnecessary use of command "vaspects -setwidth" in tests. Revert -setwidth change in test bugs/vis/bug23525
31 lines
735 B
Plaintext
31 lines
735 B
Plaintext
puts "============"
|
|
puts "OCC24966"
|
|
puts "============"
|
|
puts ""
|
|
####################################################################################
|
|
# Visualization - Problem in local selection mode with selected objects staying
|
|
# in the viewer after erase
|
|
# Selected entity owners coming from decomposition are not erased in local selection
|
|
# context
|
|
####################################################################################
|
|
|
|
vinit View1
|
|
pload ALL
|
|
vinit
|
|
|
|
vertex p1 100 100 0
|
|
vertex p2 150 300 0
|
|
edge e1 p1 p2
|
|
|
|
vdisplay e1
|
|
vselmode e1 2 1
|
|
vselmode e1 1 1
|
|
vselect 0 0 2500 2500
|
|
verase -local
|
|
|
|
if { "[vreadpixel 261 204 rgb name]" != "BLACK" } {
|
|
puts "Error : Selection is not erased."
|
|
}
|
|
|
|
vdump ${imagedir}/${casename}.png
|