Получение изображения со сканера

← →
RustiK (2004-06-25 08:19) [0]

Здраствуйте, уважаемые Все-все-все!!!

Хочу задать вопрос может я и повторюсь, но нигде честно говоря на этом сайте ответ на свой вопрос не нашел. Так что заранее извиняюсь.
Вопрос такой: "Как можно получить изображения со сканера и запихнуть его в базу данных в формате bmp или jpg?"
Принимаются любые идеи.

Если у когонить есть пример работы со сканером еще лучше.

Заранее благодарен.

← →
evvcom © (2004-06-25 08:42) [1]

Все проги (какие я встречал) работают со сканером через драйвер twain32. Ну а "запихнуть в базу данных в формате bmp или jpg" не проблема. Разобравшись с первым вопросом, второй покажется таким простым.

← →
RustiK (2004-06-25 08:53) [2]

> Все проги (какие я встречал) работают со сканером через
> драйвер twain32

Вот в том то и дело, что я знаю, что работать надо через twain. А вот как и каким образом у меня вообще мысля в голову не лезет.

Может есть кто поможет? А?

← →
RustiK (2004-06-25 09:00) [3]

Может компонет есть какой для работы со сканером?

← →
RustiK (2004-06-25 09:13) [4]

Эх... пока дождешся чего-нить...

Сам нашел. Вот есть компонет для работы со сканером TfdScan называется только он триалб вот ссылка http://denphi.narod.ru/denphi.trial.exe

А вот статья про все это http://speclab.narod.ru/twain.htm

Спасибо evvcomб что откликнулся.

Все пока

← →
evvcom © (2004-06-25 10:05) [5]

Поискал у себя сейчас, нашел компонент twainy10. Он freeware. Сам его не пробовал, компонент от 2000 года. Может свежее найдешь, но если не найдешь, а нужен, черкани, вышлю на мыло. Вот его readme:

Version: 1.0 (07.07.2000)
Author: Erol S. Uzuner

Status: Freeware
Source: Full included

Description:
--------------------
A Twain component to access twain compatible units

Warning (as usual)
--------------------
This product is FREEWARE, then you can use it for personal or commercial in any way.
You don"t need to put my name, but it"s always nice to see an acknowledges for me.
THE CODE IS PROVIDED AS IS WITH NO GUARANTEES OF ANY KIND.
USE THIS AT YOUR OWN RISK - YOU ARE THE ONLY PERSON RESPONSIBLE FOR ANY DAMAGE THIS CODE MAY CAUSE.

Author"s reference
----------
For any comments, suggestions (in Tьrkce, Deutsch, English)
Name: Erol S. Uzuner
E-Mail: sarcon@tzi.de

Да, забыл упомянуть, что он с исходниками и демо. Хотя про исходники в readme сказано.

← →
RustiK (2004-06-25 10:44) [7]

The setup program for Imaging (tool that ships with Windows > 98) installs the Image
Scan control (OCX) and the 32-bit TWAIN DLLs.
All you have to do is to import this ActiveX control in Delphi and generate a component wrapper:

Import the ActiveX Control "Kodak Image Scan Control"
(Select Component|Import ActiveX Control...)

Now add a TImgScan Component from the Register "ActiveX" to your form.

Change the following Properties in the Object Inspector:

FileType = 3 - BMP_Bitmap
PageOption = 4 - OverwritePages
ScanTo = 2 - FileOnly

{***}

procedure TForm1.Button1Click(Sender: TObject); begin if imgScan1.ScannerAvailable then try imgScan1.Image := "c:\Scanner.bmp"; imgScan1.OpenScanner; imgScan1.Zoom := 100; imgScan1.StartScan; Application.ProcessMessages; finally imgScan1.CloseScanner; { Show the scanned image in Image1 } imgScan1.Picture.LoadFromFile(Image1.Image); end; end;

ВОТ еще одно нашел правда на английском, но тут даже самому не английскому ежу будет понятно что и как делать. Никаких компонентов и примочек не надо все средствами Delphi.
ОТЛИЧНЫЙ ПРИМЕР.</B>

Получение изображения со сканера Найти похожие ветки