mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +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
29 lines
751 B
Plaintext
29 lines
751 B
Plaintext
puts "============"
|
|
puts "OCC24867"
|
|
puts "============"
|
|
puts ""
|
|
#############################################################
|
|
# [Regression] Visualization - polygon offsets look broken
|
|
#############################################################
|
|
|
|
restore [locate_data_file Top.brep] b
|
|
vinit View1
|
|
vdisplay b
|
|
vfit
|
|
vsetdispmode 1
|
|
vaspects -setwidth 5
|
|
vmoveto 200 200
|
|
if { "[vreadpixel 264 288 rgb name]" != "CYAN1" } {
|
|
puts "Error : Highlighting of dimension with flipping in local context failed."
|
|
}
|
|
|
|
if { "[vreadpixel 251 271 rgb name]" != "CYAN1" } {
|
|
puts "Error : Highlighting of dimension with flipping in local context failed."
|
|
}
|
|
|
|
vdump $::imagedir/${::casename}_highlighted.png
|
|
|
|
vselect 200 200
|
|
vdump $::imagedir/${::casename}_selected.png
|
|
|