Offset Example for Visual Basic

Dim HShift As Integer
Dim VShift As Integer
Dim RasterProc As New LEADRasterProcess
HShift = LEADRasterView1.Raster.BitmapWidth / 2
VShift = LEADRasterView1.Raster.BitmapHeight / 2
RasterProc.Offset LEADRasterView1.Raster, _
                     HShift, _
                     VShift, _
                     0, _
                     OFFSET_FILL_WRAP