tests/bugs/vis/bug24714

   1 puts "============"
   2 puts "CR24714"
   3 puts "============"
   4 puts ""
   5
   6 ##################################
   7 #  Test V3d_View::SetSize method
   8 ##################################
   9
  10 set aV "Driver1/Viewer1/View1"
  11 vinit name=$aV l=32 t=32 w=400 h=200
  12 vactivate $aV
  13 vclear
  14
  15 box b 10 10 10
  16 vdisplay b
  17 vfront
  18 vfit
  19
  20 vviewparams -size 22
  21
  22 vaspects -setwidth 5
  23 vmoveto 200 100
  24 if { "[vreadpixel 200 9 rgb name]" != "CYAN1" } {
  25   puts "Error : the view projection size is incorrect!"
  26 }
  27
  28 checkview -screenshot -3d -path ${imagedir}/${test_image}.png