The following code.
Set rc = Server.CreateObject("ABCpdf11.XRect")
rc.String = "20 20 220 120"
Response.Write "Rect = " & rc
Response.Write "<br>"
rc.Magnify 0.5, 0.5
Response.Write "Scale = " & rc
Produces the following output.
Rect = 20 20 220 120
Scale = 20 20 120 70
|