|
|
|
| Элемент управления сканированием Kodak Image
ImageScan1
Me.Imgscan1.ScanTo = 2
'0 - Только на дисплей (просмотр)
'1 - На дисплей и файл
'2 - Только в файл
'3 - На дисплей и временный файл
'4 - Только в временный файл
'5 - На факс (если установлен)
Me.Imgscan1.Image = Me.IdInboxList.Column(4)
Me.Imgscan1.ShowSetupBeforeScan = True 'Выводить диалоговое окно сканера
ImageTypeTmp = 5
'Black and white 1
'16 shades of gray 2
'256 shades of gray 3
'256 colors 4
'True color (RGB 24 bit) 5
'16 Colors 6
CompInfoTmp = -25028
'NoCompInfo 0
'JPEGLowLow 11610
'JPEGLowMed 7740
'JPEGLowHigh 3870
'JPEGMedLow 27994
'JPEGMedMed 24124
'JPEGMedHigh 20254
'JPEGHighLow -21158
'JPEGHighMed -25028
'JPEGHighHigh -28898
'MsgBox Me.ImgAdmin1.ImageResolutionX & "/" & Me.ImgAdmin1.ImageResolutionY
Me.Imgscan1.SetPageTypeCompressionOpts 3, ImageTypeTmp, 8, CompInfoTmp
|
А Как программно указать разрешение в dpi? | |
|
| |
|
|
|
| Никак. Нарыл ответ на sql.ru
На прошлой неделе занимался этим вопросом - и имхо никак. dpi и прочие тонкие настройки железки зависит от TWIN конкретного сканера (разые значения в списке подстановки - у нас сканеров только в офисе штук десять, так что насмотрелся на разные TWIN'ы - пришлось для каждой модели свою инструкцию писать с разными картинками) и его устанавливает пользователь - разве что в реестре ковыряться, но это не есть гуд.
Если TWIN "культурный" (и пользователь - не менее, чем Power User), то он запомнит настройки, которые выставлялись в предыдущем сеансе.
|
| |
|
| |