mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-26 11:05:31 +03:00
46 lines
1.1 KiB
Plaintext
46 lines
1.1 KiB
Plaintext
puts "=================================="
|
|
puts "AIS_ViewCube - check positioning of View Cube"
|
|
puts "=================================="
|
|
|
|
set anImage1 $imagedir/${casename}_1.png
|
|
set anImage2 $imagedir/${casename}_2.png
|
|
set anImage3 $imagedir/${casename}_3.png
|
|
set anImage4 $imagedir/${casename}_4.png
|
|
|
|
vclear
|
|
vclose ALL
|
|
vinit
|
|
|
|
# -------------------------------------
|
|
# display view cube object
|
|
# -------------------------------------
|
|
vviewcube -enable -size 70 -adaptsize
|
|
|
|
# -------------------------------------
|
|
# check positioning of view cube object
|
|
# -------------------------------------
|
|
if {[vreadpixel 96 285 name] != "GRAY68 1"} {
|
|
puts "ERROR: Bottom left View Cube fails."
|
|
}
|
|
vdump $anImage1
|
|
|
|
vviewcube -position 200 200
|
|
if {[vreadpixel 200 176 name] != "GRAY68 1"} {
|
|
puts "ERROR: Center View Cube fails."
|
|
}
|
|
vdump $anImage2
|
|
|
|
vviewcube -position 310 100
|
|
if {[vreadpixel 310 73 name] != "GRAY68 1"} {
|
|
puts "ERROR: Top right View Cube fails."
|
|
}
|
|
vdump $anImage3
|
|
|
|
vviewcube -position 140 240
|
|
if {[vreadpixel 140 217 name] != "GRAY68 1"} {
|
|
puts "ERROR: Custom View Cube fails."
|
|
}
|
|
vdump $anImage4
|
|
|
|
vviewcube -remove
|
|
vclear |