tests/bugs/vis/bug25732_1

   1 puts "========"
   2 puts "OCC25732"
   3 puts "========"
   4 puts ""
   5 #########################################################################################
   6 # Visualization, TKOpenGl - back face culling should not affect textured font rendering
   7 #########################################################################################
   8
   9 box b -100 0 -200 50 100 200
  10
  11 vinit View1
  12 vclear
  13 vaxo
  14
  15 vdisplay b
  16 vfit
  17 vsetdispmode b 1
  18
  19 vdrawtext text "Open\nCASCADE" -pos 0 0 0 -color 1.0 0.0 0.0 -halign center -valign center -angle -45 -zoom 1 -height 50 -aspect regular -font Arial
  20
  21 set bug_info [vreadpixel 255 283 rgb name]
  22 if {$bug_info != "RED"} {
  23   puts "ERROR: OCC25732 is reproduced. Text is missed."
  24 }
  25
  26 set only_screen 1