tests/bugs/vis/bug26462_1

   1 puts "============"
   2 puts "CR26462"
   3 puts "============"
   4 puts ""
   5
   6 ##########################################################################################
   7 puts "Visualization - selection does not adapt to line width change"
   8 ##########################################################################################
   9
  10 pload VISUALIZATION MODELING
  11
  12 vinit
  13 box b1 10 10 10
  14 box b2 10 10 10
  15
  16 vdisplay b1 b2
  17 vsetlocation b1 10 10 0
  18 vfit
  19
  20 vaspects b1 b2 -setWidth 3
  21
  22 vselmode 2 1
  23 # try to select b1 and b2
  24 vselect 305 322 1
  25 vselect 103 322 1
  26 # check that both boxes were not selected with default tolerance value
  27 set aNbSelected [vnbselected]
  28 if {$aNbSelected != "0"} {
  29   puts "ERROR: no boxes must be selected!"
  30 }
  31
  32 puts "0029779: Visualization, SelectMgr_SelectableObject - sensitivity change for object not activated in given mode leads to crash"
  33 vaspects b1 -setSensitivity 3 4
  34
  35 # increase tolerance for b1
  36 vaspects b1 -setSensitivity 2 4
  37
  38 # select edge of b1
  39 vselect 305 322
  40 # check that b1's edge was selected
  41 set aNbSelected [vnbselected]
  42 if {$aNbSelected != "1"} {
  43   puts "ERROR: b1 was not selected"
  44 }
  45 # try to select b2
  46 vselect 103 322 1
  47 # check that increase of tolerance for b1 doesn't influence
  48 # on b2
  49 set aNbSelected [vnbselected]
  50 if {$aNbSelected != "1"} {
  51   puts "ERROR: b2 is selected after b1's tolerance increased"
  52 }
  53
  54 checkview -screenshot -3d -path ${imagedir}/${test_image}.png