tests/bugs/vis/bug23649_3

   1 puts "============"
   2 puts "CR23649"
   3 puts "============"
   4 puts ""
   5
   6 #######################################################################
   7 # 0023649: Different behaviour of highlighting after shift selection.
   8 # It tests default functionality of highlighting
   9 # during shift selection of shapes (neutral point).
  10 #######################################################################
  11
  12 set anImage1 $imagedir/${casename}_Selection.png
  13 set anImage2 $imagedir/${casename}_HighlightFirst.png
  14 set anImage3 $imagedir/${casename}_HighlightSecond.png
  15
  16 box a 2 0 0 3 2 1
  17 box b 1 2 3
  18 vinit
  19 vdisplay a b
  20 vfit
  21 #select the first shape
  22 vselect 70 230
  23 #select the second shape
  24 vselect 200 358 1
  25 vmoveto 0 0
  26 vdump ${anImage1}
  27
  28 #highlight the first edge - it should NOT be highlightable by default
  29 vmoveto 70 230
  30 vdump ${anImage2}
  31
  32 #highlight the second edge - it should NOT be highlightable by default
  33 vmoveto 200 358
  34 vdump ${anImage3}