puts "================" puts "OCC1786" puts "OCC2707" puts "================" ####################################################################################### # AIS_LC::AddOrRemoveSelected(Handle(SelectMgr_EntityOwner), ..) works too slow ####################################################################################### 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)" } checkview -screenshot -3d -path ${imagedir}/${test_image}.png