AutoSize Example for Visual Basic

Note: Also works with Access 95 and 97.

This example shows how the AutoSize property works when loading and when rotating an image.

    Dim RasterProc As New LEADRasterProcess
    Dim RasterIO As New LEADRasterIO
    LEADRasterView1.AutoSize = True
    RasterIO.Load LEADRasterView1.Raster, "v:\images\hls.bmp", 0, 0, 1
    MsgBox "Control is sized to fit the loaded bitmap"
    RasterProc.Rotate LEADRasterView1.Raster, 4500, ROTATE_RESIZE, RGB(0, 0, 0)
    MsgBox "Control is sized to fit the rotated bitmap"