tests/bugs/vis/bug22016

   1 puts "========"
   2 puts "OCC22016"
   3 puts "========"
   4 puts ""
   5 #########################################################################################
   6 # Incorrect selection color after displaying a selected object
   7 #########################################################################################
   8
   9 pload MODELING VISUALIZATION
  10 box b1 0 0 0 1 2 3
  11 box b2 3 0 0 2 3 1
  12 vinit View1
  13 vclear
  14 vaxo
  15 vdisplay -noupdate b1 b2
  16 vaspects b1 b2 -setWidth 4
  17 vfit
  18 vselect 0 0 500 500
  19 vdisplay b2
  20 set aColor1 [vreadpixel 104  32 rgb name]
  21 set aColor2 [vreadpixel 255 350 rgb name]
  22
  23 if {$aColor1 != "GRAY80" || $aColor2 != "GRAY80" } {
  24   puts "ERROR: OCC22016 is reproduced. Incorrect selection color after displaying a selected object."
  25 }
  26
  27 vdump ${imagedir}/${casename}.png