Подскажите как добавить изображение со сканера в TImage

[Terran]

У меня работают два типа. При выборе первой строки появляется расширенная менюшка с кучей настроек сканирования, а при выборе второй появляется стандартное виндовское меню для получения изображения от сканера.
Может не хватает каких-то dll библиотек для сканера поэтому баг…

[Herly]

Мне бы хотелось что бы не открывалось самодельное окно сканирования, а открывалось окно сканирования, которое идёт вместе с дровами от сканера. Вот с помощью прикреплюнной проги это у меня получалось, но создаётся картинка на диске, которую я хочу удалить, но незнаю как.
Либо там можно сделать что бы не сохранялась, но тогда не знаю как вывести. Два кода приведены в самом начале моего поста.

[Herly]

Сообщение от Terran

У меня работают два типа. При выборе первой строки появляется расширенная менюшка с кучей настроек сканирования, а при выборе второй появляется стандартное виндовское меню для получения изображения от сканера.
Может не хватает каких-то dll библиотек для сканера поэтому баг…

Скиньте плиз тогда ваш код, потому что при переделывании кода из другой темы получилась ошибка при сканировании...
А вообще хотелось бы убрать вторую строку.

[raxp]

...эти два интерфейса hp любит "пихать", одно от самих драйверов, как вы и хотите, второе окно от самого сканера.
зы: в архивчике ничего кроме кряка нету... кряки запрещены.

[Herly]

Но дело в том что собрать рабочий код из примера, который находится в другой теме у меня не получилось(.
А в целом модуль Terran,на мне нравится больше чем EZTwain, т.к он не требует какой либо лицензии)

[Terran]

Вот собрал Вам исходничёк: Twain.rar
У меня он работает отлично! Ничего не сохраняет и выводит изображение сразу в Image.

[Herly]

А вот вы не моглибы запихнуть мне в одну кнопочку, чтобы тупо сканировало(открывалось окно Hp только и картинка закидывалось в Image1).
А то просто с компонентом меню не работал никогда.
и не понимаю что есть вот это:
function stp2(s:byte):longint;
var
m: longint;
i: byte;
begin
m:=2;
for i:=2 to s do m:=m*2;
stp2:=m;
end;

[Terran]

Что-то я не совсем понял... Вы хотите чтобы вместо меню это всё на обычных кнопках сделать?

[Herly]

Мне нужна одна кнопка.
Я на неё тыкаю, и открывается меня сканирования Hp(просто мне почему то кажется что лучше юзать дрова сканера). Затем яжму сканировать в меня сканера и результат загружается в Image.
У меня задача не сделать найс прогу для сканирования, а сделать сканирование и научится распозновать хотя бы цифры с изображения....

[Terran]

Всё, теперь понял.
Вам нужно будет сначала указать источник сканирования, а потом чтобы его постоянно при запуске проги не указывать можете сохранить настройки в самой проге(но это уже отдельный вопрос).
Далее у Вас есть одна кнопочка в меню. Можно вместо неё поставить обычную кнопочку и при нажатии на неё всё будет происходить как Вам нужно.
P.S. Функция function stp2(s:byte):longint; ,умножает число 2 на 2 столько раз, сколько вы ей передадите в качестве параметра.