Сканер

← →
Sandman25 (2003-12-16 12:52) [0]

Здравствуйте.

Пытаемся использовать сканер через Twain. Импортировали Kodec Scaner из ActiveX, но при выполнении сканирования зависает. Сканер в порядке, из других программ работает.
В инете нашли кучу примеров, как выполнять сканирование из Delphi, но они противоречат друг другу, и ни один не работает.
Пишу по памяти, к машине, где ведется разработка, сейчас нет доступа.
with ImgSrc do begin if ScanerAvailable then begin ShowSelectScanner; // работает, показывает диалог выбора сканера Self.Caption := GetVersion; // возвращает путсую строку. Разве это нормально? OpenScanner; Self.Caption := GetVersion; // тоже возвращает путсую строку :( try ScanTo := 2; Image := "D:\Temp\1.bmp"; // ImageType настроен в 3-bmp StartScan; { вот тут зависает. Если не делать OpenScanner, ругается kernel32 AccessViolation } finally CloseScanner; end; end; end;

Помогите, пожалуйста.

Сканер Найти похожие ветки