puts "OCC21747"
puts "============"
puts ""
-#######################################################################
-# Implementation of gradient background style
-#
-# vsetgradientbg: vsetgradientbg R1 G1 B1 R2 G2 B2 Type
-# R1\G1\B1 - First color [0..255]
-# R2\G2\B2 - Second color [0..255]
-# Type 0 to 8
-# 0 = NONE,
-# 1 = HORIZONTAL,
-# 2 = VERTICAL,
-# 3 = DIAGONAL1,
-# 4 = DIAGONAL2,
-# 5 = CORNER1,
-# 6 = CORNER2,
-# 7 = CORNER3,
-# 8 = CORNER4
-#######################################################################
set BugNumber OCC21747
vinit
-set R1 0
-set G1 0
-set B1 255
-set R2 255
-set G2 0
-set B2 0
-set Type 4
-
puts "${BugNumber}"
puts "Type=DIAGONAL2, Color from BLUE to RED, Direction from RIGHT TOP CORNER to LEFT BOTTOM CORNER"
-puts "R1=${R1} G1=${G1} B1=${B1} R2=${R2} G2=${G2} B2=${B2} Type=${Type}"
-vsetgradientbg ${R1} ${G1} ${B1} ${R2} ${G2} ${B2} ${Type}
+vbackground -gradient BLUE1 RED -gradientMode DIAGONAL2
checkview -screenshot -3d -path ${imagedir}/${test_image}.png