tests/vselect/cone_cylinder/single_click_selection_cone

   1 puts "================================="
   2 puts "0032281: Visualization - add Select3D_SensitiveCylinder"
   3 puts "Tests selection of Select3D_SensitiveCylinder"
   4 puts "================================="
   5
   6 pcone cone 10 0 20
   7 vdisplay cone -dispmode 1
   8 vfit
   9 vselect 300 200
  10 if { ![string match "*Selected*" [vstate cone]] } { puts "Error: cone should be selected" }
  11 vselect 300 101
  12 if { ![string match "*Selected*" [vstate cone]] } { puts "Error: cone should be selected" }
  13 vselect 300 300
  14 if { ![string match "*Selected*" [vstate cone]] } { puts "Error: cone should be selected" }
  15
  16 vselect 357 182
  17 if { [string match "*Selected*" [vstate cone]] } { puts "Error: cone should be unselected" }
  18 vselect 242 182
  19 if { [string match "*Selected*" [vstate cone]] } { puts "Error: cone should be unselected" }
  20 vselect 310 101
  21 if { [string match "*Selected*" [vstate cone]] } { puts "Error: cone should be unselected" }