tests/bugs/vis/bug27893

   1 puts "==========="
   2 puts "OCC27893"
   3 puts "==========="
   4 puts ""
   5 ##########################################################################
   6 # Visualization - AIS_InteractiveContext::SetSelected does not work
   7 ##########################################################################
   8
   9 pload VISUALIZATION QAcommands
  10
  11 vinit
  12 OCC27893
  13 vfit
  14
  15 if {[vnbselected] != "1" || [vreadpixel 204 254 name] != "GRAY80 1"} {
  16   puts "ERROR: The box is not selected, AIS_InteractiveContext::SetSelected works incorrect"
  17 }