Работа со сканером [D5]
Ильнур © (2002-06-13 11:05:00)
подскажите как в программе сканировать изображение и сохранить
его в формате jpg.
При этом можно канечно вызвать тваин диалог самого сканера но
это слишком долго (предварительное сканирование, сохранение.
Хотелось как в FainRidere с опцией без вызова тваин диалога.
OCX компонент Imegscan не может сохранить его в формате jpg,
а только в TIFF,BMP,WMF. А поскольку файлы предпологается хранить в
базе данных эти форматы не подходят (они получаются большими -
проверено). подскажите может программно можно както их
конвертировать или подскажите где взять компонент управления
сканером)
Заранее большое спасибо!
Hub (2002-06-13 16:05:00) [1]
Конвертирование однозначное, т.к. у нас работает промышленная
прога Xerox"овая с обязательной конвертацией Tiff в Jpeg.
Конвертируем из bmp в jpeg:
uses jpeg;
var
jp: TJpegImage;
BitMap1: TBitMap;
begin
BitMap1:=TBitMap.Create;
BitMap1.LoadFromFile("my.bmp");
jp:=TJpegImage.Create;
jp.Assign(BitMap1);
jp.SaveToFile("my.jpg");
BitMap1.Free;
jp.Free;
end;
Модуль jpeg - стандартный в Д5.
Наверх 
ЧАТ |
Орешник |
|
