tests/bugs/vis/bug23407_1

   1 puts "============"
   2 puts "CR23407"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Draw face outlines for XDE objects
   7 #######################################################################
   8 pload XDEDRAW
   9
  10 XNewDoc Doc1
  11 ReadStep Doc1 [locate_data_file screw.step]
  12 XShow Doc1 0:1:1:1
  13 XShowFaceBoundary Doc1 0:1:1:1 1 255 0 0 10 1
  14 vfit
  15 vsetdispmode 1
  16
  17 set x_coord 178
  18 set y_coord 36
  19
  20 checkcolor $x_coord $y_coord 1 0 0
  21
  22 if { $stat != 1 } {
  23    puts "Error : Boundary of face is not changed"
  24 }
  25
  26 set x_coord 244
  27 set y_coord 89
  28
  29 checkcolor $x_coord $y_coord 1 0 0
  30
  31 if { $stat != 01} {
  32    puts "Error : Boundary of face is not changed"
  33 }
  34
  35 checkview -screenshot -3d -path ${imagedir}/${test_image}.png
  36
  37