OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-19 13:40:49 +03:00
Code Activity

0026779: Draw Harness, ViewerTest - vstate output is incorrect for sub-shapes selection without opening local context

Browse Source 
- vstate output was corrected to handle parts selection without opened local context;
- test case for issue #26779
This commit is contained in:
vpa
2015-10-19 17:28:06 +03:00
committed by bugmaster
parent fe30607a18
commit 23963a92d2
2 changed files with 94 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
tests/bugs/vis/bug26779 Normal file
View File

@@ -0,0 +1,60 @@
puts "============"
puts "CR26779"
puts "============"
puts ""
##########################################################################################
puts "Draw Harness, ViewerTest - vstate output is incorrect for sub-shapes selection without opening local context"
##########################################################################################
pload MODELING VISUALIZATION
box b1 1 2 3
box b2 5 5 5 1 1 1
vclear
vclose ALL
vinit View1
vaxo
vsetdispmode 1
vdisplay b1
vfit
vselmode b1 4 1
vselect 300 300
set anInfo [split [vstate] "\n"]
set aItem1 [lindex $anInfo 0]
set aItem2 [string trim [lindex $anInfo 1] ]
set aSize [llength $anInfo]
if {$aSize != 3 || [string compare $aItem1 "Locally selected sub-shapes within b1:"] != 0 || [string compare $aItem2 "Face #2"] != 0} {
puts "ERROR: vstate output for selected face is incorrect"
}
vdisplay b2
vfit
vselect 350 120 1
set anInfo [split [vstate *] "\n"]
set aItem1 [string trim [lindex $anInfo 1] ]
set aItem2 [string trim [lindex $anInfo 2] ]
set aItem3 [string trim [lindex $anInfo 4] ]
set aSize [llength $anInfo]
puts $aItem1
puts $aItem2
puts $aSize
if {$aSize != 6} {
puts "ERROR: vstate output for shift selection is incorrect"
}
if {[string compare $aItem1 "b1 Displayed Type: AIS_Shape (AIS_Shape)"] != 0 &&
[string compare $aItem2 "b1 Displayed Type: AIS_Shape (AIS_Shape)"] != 0} {
puts "ERROR: no info about object b1 in vstate output"
}
if {[string compare $aItem1 "b2 Displayed Selected Detected Type: AIS_Shape (AIS_Shape)"] != 0 &&
[string compare $aItem2 "b2 Displayed Selected Detected Type: AIS_Shape (AIS_Shape)"] != 0} {
puts "ERROR: no info about object b2 in vstate output"
}
if {[string compare $aItem3 "Face #2"] != 0} {
puts "ERROR: vstate output for selected face in test part 2 is incorrect"
}
set only_screen 1