Image Options Example for Visual Basic

Dim RasterTwain As New LEADRasterTwain_U

RasterTwain.InitSession hWnd
RasterTwain.SelectSource

Dim nBPP As Integer
Dim nUnit As Integer

nUnit = RasterTwain.ImageUnit
nBPP = RasterTwain.ImageBitsPerPixel

If nUnit <> L_TWUN_INCHES Then RasterTwain.ImageUnit = L_TWUN_INCHES
If nBPP <> 24 Then RasterTwain.ImageBitsPerPixel = 24