mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
14 lines
353 B
Plaintext
14 lines
353 B
Plaintext
puts "========"
|
|
puts "0029739: Draw Harness - vdonly does not hide displayed objects"
|
|
puts "========"
|
|
|
|
box b1 0 0 0 1 2 3
|
|
box b2 2 0 0 3 2 1
|
|
vclear
|
|
vaxo
|
|
vdisplay -dispMode 1 b1 b2
|
|
vfit
|
|
vdonly b1
|
|
if {[vreadpixel 100 100 rgb name] == "BLACK"} {puts "Error: wrong prs erased"}
|
|
if {[vreadpixel 300 300 rgb name] != "BLACK"} {puts "Error: wrong prs erased"}
|