tests/vselect/cone_cylinder/detecting

   1 puts "================================="
   2 puts "0032281: Visualization - add Select3D_SensitiveCylinder"
   3 puts "Tests detecting Select3D_SensitiveCylinder"
   4 puts "================================="
   5
   6 pcylinder cyl 10 20
   7 vdisplay cyl -dispmode 1
   8 vfit
   9 vmoveto 300 200
  10 if { ![string match "*Select3D_SensitiveCylinder*" [vstate -entities]] } { puts "Error: cylinder should be detected" }
  11 vremove cyl
  12
  13 pcone cone 10 0 20
  14 vdisplay cone -dispmode 1
  15 vfit
  16 vmoveto 300 200
  17 if { ![string match "*Select3D_SensitiveCylinder*" [vstate -entities]] } { puts "Error: cone should be detected" }
  18 vremove cone
  19
  20 pcone tr_cone 10 5 10
  21 vdisplay tr_cone -dispmode 1
  22 vfit
  23 vmoveto 300 200
  24 if { ![string match "*Select3D_SensitiveCylinder*" [vstate -entities]] } { puts "Error: truncated cone should be detected" }