Главная страница
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.042 c
14-1100801242
Quath
2004-11-18 21:07
2004.12.05
Мастерам словесного поноса!!! Читать обязательно!!!


1-1100719298
bloodman
2004-11-17 22:21
2004.12.05
ааа помогите плииз восстановить проект Ж((


3-1099735417
Black
2004-11-06 13:03
2004.12.05
Как передать названия таблиц с сервера на клиент?


11-1083761063
H7LB
2004-05-05 16:44
2004.12.05
KOL editbox maxlength ?


4-1098273354
Александр В.
2004-10-20 15:55
2004.12.05
Програмное закрытие модального окна (диалог)