tests/bugs/vis/bug25475

   1 puts "============"
   2 puts "OCC25475"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 puts "Tests textured background"
   7 #######################################################################
   8
   9 set aTextureFile [locate_data_file hatch_1.png]
  10 set anImage1 $imagedir/${casename}_1.png
  11 set anImage2 $imagedir/${casename}_2.png
  12 set anImage3 $imagedir/${casename}_3.png
  13 set anImage4 $imagedir/${casename}_4.png
  14
  15 pload VISUALIZATION
  16 vinit
  17
  18 vsetbg $aTextureFile STRETCH
  19 vdump $anImage1
  20
  21 vsetbg $aTextureFile NONE
  22 vsetbg $aTextureFile TILED
  23 vdump $anImage2
  24
  25 vsetgradientbg 255 0 0 0 0 255 1
  26 vsetbg $aTextureFile CENTERED
  27 vdump $anImage3
  28
  29 vsetbg $aTextureFile NONE
  30 vdump $anImage4