--- /dev/null
+puts "============"
+puts "CR24714: Test V3d_View::SetSize method"
+puts "============"
+puts ""
+
+pload MODELING VISUALIZATION
+set aV "Driver1/Viewer1/View1"
+vinit name=$aV l=32 t=32 w=400 h=200
+vactivate $aV
+vclear
+
+box b 10 10 10
+vdisplay b
+vfront
+vfit
+
+vviewparams -size 22
+
+vaspects -setwidth 5
+vmoveto 200 100
+if { "[vreadpixel 200 9 rgb name]" != "CYAN" } {
+ puts "Error : the view projection size is incorrect!"
+}
+
+vdump ${imagedir}/${casename}.png