Printer Object

CalcPicture

 
Syntax
 
Printer.CalcPicture = strPicFile
 
Description
Calculates the size of a picture in twips, and returns the result in X1, X2, Y1, and Y2.
 
You can use this property to determine whether a picture will fit on the current page or to position graphical elements with respect to the picture.
 
To render the pricture, use the DrawPicture method.
 
See Also
DrawPicture.
Example
 
Sub Main
Dim i%, s$
 
With Printer 
   'Printer object activeren: 
   If Not.Init() Then End 
   .SpaceAfter = "0.5in" 
   .CalcPicture = "c:\mybitmap.bmp" 
   debug.Print .X1, .X2, .Y1, .Y2 
   .Submit
End With
 
End Sub