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

Вниз

проверка Tbitmap помещаемого в image   Найти похожие ветки 

 
denis24   (2004-11-18 10:27) [0]

Получаю bitmap со сканера и заливаю в image

TWAIN_DrawDibToDC(MyBitMap.Canvas.Handle,0,0,Width,Height,dat,0,0);
jpeg.Assign(MyBitMap);
ImageUzi1.Picture.Graphic:=jpeg;
можно ли както здесь контролировать размер этого bitmap ,чтоб ограничивать размер отсканированого?


 
Ega23 ©   (2004-11-18 10:28) [1]

Нет, но если, например, ширина-высота больше чего-то там, то через StretchDraw можно его размер уменьшить.


 
ЮЮ ©   (2004-11-18 10:31) [2]

>ImageUzi1.Picture.Graphic:=jpeg;

Думаешь тут без TBitMap обходится? jpeg - формат хранения BitMap-а в файле. Создай MySmallBitMap нкжного размера и "качни" туда MyBitMap


 
denis24   (2004-11-18 10:50) [3]

To ЮЮ ©
Если я заливаю mybitmap разрешением 800*600 в mysmallbitmap с разрешением 640*480 то не будет никакого искажения и потери данных?


 
Ega23 ©   (2004-11-18 10:52) [4]

Конечно будет. Бесплатный - только сыр в мышеловке.


 
ЮЮ ©   (2004-11-18 11:08) [5]

заливаю - это преобразовываю. StretchDraw, например.

В Grahichs32, где доступ к пикселя значительно быстрее и есть возможность уделять внимание качеству преобразований, в оттисках 32х32 с 640х480 легко можно было угадать исходную картинку, а при 800*600 -> 640*480 видимых глазом потерь вообще практически не будет


 
denis24   (2004-11-18 16:21) [6]

А если заливать изображение со сканеру в битмап у которого уже будет установлено 640*480
Типа так
MyBitMap.Width := 640;
MyBitMap.Height := 480;
TWAIN_DrawDibToDC(MyBitMap.Canvas.Handle,.......
?


 
Amoeba ©   (2004-11-18 16:24) [7]

Попробуй. Практика - лучший критерий истины.



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

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

Наверх




Память: 0.48 MB
Время: 0.121 c
1-1100846847
hgd
2004-11-19 09:47
2004.12.05
Разрешение экрана


4-1098290737
Specialist
2004-10-20 20:45
2004.12.05
Как скрыть процесс в WinXP в Delphi?


3-1100013025
denis24
2004-11-09 18:10
2004.12.05
datamodule1.tbl1


1-1101079371
TechnoDreamer
2004-11-22 02:22
2004.12.05
Удаление ветки с дочерними элементами TTreeView


10-1068726430
yursa
2003-11-13 15:27
2004.12.05
DCOM&Excel