Including Images

Printing images is merely a matter of using the PaintPicture method to place the image on the page at the specified location. The code in Listing 9.11 shows how to include two different images on the same object at the same time. Figure 9.10 shows the results.

Listing 9.11: Command8_Click Event in Print

Private Sub Command8_Click()
Picture1.Cls
Picture1.PaintPicture LoadPicture(App.Path & “\p944ts.bmp”), 144, 720
Picture1.PaintPicture LoadPicture(App.Path & “\cj&sam.bmp”), 2880, 1440
End Sub

Figure 9.10: I used the PaintPicture method to print these pictures of my three children.

© 1998 SYBEX Inc. All rights reserved.