Главная страница
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
7-16748
Andrew287
2003-11-21 01:39
2004.02.06
Остановка службы


1-16456
Галинка
2004-01-28 06:43
2004.02.06
О типах данных в Delphi


3-16104
Grotesk
2004-01-08 18:53
2004.02.06
MS DTS + Delphi


6-16559
umx
2003-12-01 23:49
2004.02.06
Tthread


7-16776
Lserge
2003-11-22 11:49
2004.02.06
изменение звуков программных событий