how to print image in picture control?

[hvisionexpo]

Using PB 9.0.2 Build 7661 and I am using PICTURE object to display the image. The picture size is bigger than the screen can display so I have vertical & horizontal scrollbars on the window.

It is printing what you see on the screen and not
the complete image in the picture control.

Code that I have presently to print the picture is:

long Job

Job = PrintOpen('Print Image')
p_image.Print(Job, 200, 200)
PrintClose(Job)

Is there a way to print the complete image displayed in the Picture control?

 

[mbalent]

Try the print method with the two optional parameters for print width and height (i.e., p_image.Print(Job, 200, 300, 3000, 5000). If you don't specify the width and height the control's original values are used.

Matt

"Nature forges everything on the anvil of time