* UT_FIMG.PRG * Add a really long image to a long container in a VFP * Form PUBLIC myform as Form myForm=CREATEOBJECT('theform') myform.Show * The form presents DEFINE CLASS theImageContainer as Container top=0 left=0 backcolor=RGB(255,255,255) height=1500 * You may want to match this width with your image width width=300 visible=.t. ADD OBJECT theImage as Image theImage.top=10 theImage.left=10 theImage.stretch=2 theImage.height=1000 theImage.width=280 * Put your tall image here theImage.picture="d:\r6solutionstmp\r6_dock\imx\shipping.ico" theImage.visible=.t. ENDDEFINE &&CLASS cntImage as Container DEFINE CLASS theform as Form autocenter=.t. visible=.t. caption=[Tall Image In a Form] height=300 width=300 scrollbars=2 ADD OBJECT cntImage as theImageContainer ENDDEFINE &&CLASS theform as Form