Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.22;
Скачать: CL | DM;

Вниз

Работа со сканером   Найти похожие ветки 

 
Ильнур   (2002-06-10 14:50) [0]

Нужна компонента или просто подскажите как в программе сканировать изображение и сохранить его в формате jpg.
При этом можно канечно вызвать тваин диалог самого сканера но это слишком долго (предварительное сканирование, сохранение.
Хотелось как в FainRidere с опцией без вызова тваин диалога.
Помогите пожалуста кто сможет!


 
Producer   (2002-06-10 14:57) [1]

Ну попробуй, обратись к спецам из ABBYY - может поделятся.


 
Burmistroff   (2002-06-10 15:06) [2]

В Win98 есть программа - Imaging. Так вот, она сделана н OCX компоненте, которые лежат в папке Windows/System. Их нужно просто установить через Delphi. НО - при переводе на другую машину нужно будет взять эти OCX файлы и зарегистрировать их там.


 
Burmistroff   (2002-06-10 15:12) [3]

вот тогда как будет выглядеть весь процесс:

...
sca: TImgScan;
...

var
ss:TShiftState;
implementation


{$R *.dfm}

procedure TForm1.BitBtn1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
ss:=Shift;
end;

procedure TForm1.BitBtn1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
ss:=Shift;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if ssShift in ss then sca.ShowSetupBeforeScan:=true else sca.ShowSetupBeforeScan:=false;
deletefile(sca.image);
sca.StartScan;
end;


 
Ильнур   (2002-06-10 15:47) [4]

Спасибо всем за ответы особенно Burmistroff!



Страницы: 1 вся ветка

Текущий архив: 2002.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-71096
X-jedy
2002-08-09 14:24
2002.08.22
Как оптимально сделать Create и Free куче переменных TStringlist?


14-71329
Brand
2002-07-26 23:46
2002.08.22
Расположение окон Delphi


3-71000
Дмитрий Калугин
2002-07-31 16:22
2002.08.22
Обнуление генератора


14-71362
ZLOST
2002-07-28 07:22
2002.08.22
Народ,поможите,срочно нужен компонент типа TXPForm можно и Dll-ку


3-70980
SaS13
2002-07-31 11:21
2002.08.22
Остановить выполнение запроса