mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
73 lines
1.7 KiB
Plaintext
Executable File
73 lines
1.7 KiB
Plaintext
Executable File
puts "================"
|
|
puts "OCC1786"
|
|
puts "OCC2707"
|
|
puts "================"
|
|
#######################################################################################
|
|
# AIS_LC::AddOrRemoveSelected(Handle(SelectMgr_EntityOwner), ..) works too slow
|
|
# Various improvements of RINA LH3D-3H project
|
|
#######################################################################################
|
|
|
|
box b1 10 10 10
|
|
box b2 20 20 20 10 10 10
|
|
vinit
|
|
vdisplay b1 b2
|
|
vfit
|
|
|
|
# box b1
|
|
set x11 57 ; set y11 322
|
|
set x12 118 ; set y12 322
|
|
|
|
# box b2
|
|
set x21 290 ; set y21 186
|
|
set x22 352 ; set y22 186
|
|
|
|
set Selection_R 0.8
|
|
set Selection_G 0.8
|
|
set Selection_B 0.8
|
|
|
|
set Idle_R 1
|
|
set Idle_G 1
|
|
set Idle_B 0
|
|
|
|
#QASetChoiceMode EDGE ON
|
|
vselmode 2 1
|
|
set AutoHilight 0
|
|
OCC1786 ${AutoHilight}
|
|
set BeforeNbSelected [vnbselected]
|
|
|
|
checkcolor ${x12} ${y12} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
checkcolor ${x21} ${y21} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
checkcolor ${x22} ${y22} ${Idle_R} ${Idle_G} ${Idle_B}
|
|
|
|
if {${BeforeNbSelected} == 0} {
|
|
puts "OCC1786: OK (case 4: before selection)"
|
|
} else {
|
|
puts "OCC1786: Error (case 4: before selection)"
|
|
}
|
|
|
|
# Select edges
|
|
|
|
vselect 0 0 1
|
|
|
|
vselect ${x11} ${y11} 1
|
|
vselect ${x12} ${y12} 1
|
|
|
|
vselect ${x21} ${y21} 1
|
|
vselect ${x22} ${y22} 1
|
|
|
|
vselect 0 0 1
|
|
set AfterNbSelected [vnbselected]
|
|
|
|
checkcolor ${x11} ${y11} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x12} ${y12} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x21} ${y21} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
checkcolor ${x22} ${y22} ${Selection_R} ${Selection_G} ${Selection_B}
|
|
|
|
if {${AfterNbSelected} == 4} {
|
|
puts "OCC1786: OK (case 9: after selection)"
|
|
} else {
|
|
puts "OCC1786: Error (case 9: after selection)"
|
|
}
|
|
|
|
set only_screen 1
|