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

Вниз

StretchDraw()   Найти похожие ветки 

 
freeloader   (2003-05-22 16:59) [0]

Ничего не получается :(( Хочу из большого bmp сделать уменьшенный по размерам jpg. Помогите, где ошибка?

bmp:=NewDIBBitmap(1024,768,pf16bit);
tmp:=NewDIBBitmap(185,138,pf16bit);
Jpg:=NewJpeg;

jpg.Performance:=jpBestSpeed;
jpg.CompressionQuality:=30;

//skip: каптюрю экран в bmp

Tmp.StretchDraw(bmp.handle,MakeRect(0,0,185,138));
( "c:\444.bmp") Ничего не получается :(( Хочу из большого bmp сделать уменьшенный по размерам jpg. Помогите, где ошибка?

bmp:=NewDIBBitmap(1024,768,pf16bit);
tmp:=NewDIBBitmap(185,138,pf16bit);
Jpg:=NewJpeg;

jpg.Performance:=jpBestSpeed;
jpg.CompressionQuality:=30;

//skip: каптюрю экран в bmp

Tmp.StretchDraw(bmp.handle,MakeRect(0,0,185,138));
tmp.SaveToFile("c:\444.bmp");

И уже вот тут у меня чёрный квадрат......
Огромное спасибо за потраченное время.


 
mdw ©   (2003-05-22 21:54) [1]

Рисовать нужно все же на DC:HDC, а не на HBITMAP
Попробуй:
Tmp.StretchDraw(bmp. Canvas.handle,MakeRect(0,0,185,138));



 
mdw ©   (2003-05-22 22:00) [2]

И вобще, тогда уж:
Bmp.StretchDraw( Tmp.Canvas.handle,MakeRect(0,0,185,138));



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
4-16823
igornov
2003-11-13 16:22
2004.02.06
Как заставить нормально работать delphi- сервис при log of и on


7-16755
Lena_sv
2003-11-20 10:09
2004.02.06
разрешение экрана


14-16600
ёё
2004-01-15 14:10
2004.02.06
Что есть пиринговые сети?


11-16208
Danil
2003-05-21 01:13
2004.02.06
Как изобразить на кнопке смайлик?


1-16464
Евгения
2004-01-27 23:06
2004.02.06
Нет страницы Report.