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

Вниз

Сглаживание изображения (tbitmap)   Найти похожие ветки 

 
Tirex   (2005-03-13 10:46) [0]

Собственно сабж. Есть изображение ~ 400 300 оно умешьается StretchBlt до 150 на 150. Края получаются "рванные" так что хотелось бы его немного сгладить.


 
Fenik   (2005-03-13 11:32) [1]

http://www.torry.ru/vcl/graphics/bitmap/resample.zip


 
Tirex   (2005-03-14 09:44) [2]

Спасибо.


 
Tirex   (2005-03-14 14:53) [3]

И все таки это больше размытие чем сглаживание. Может быть еще есть какие-нибудь пути?


 
Tirex   (2005-03-14 18:34) [4]

Нашел функцию
SetStretchBltMode(tbm_min.Canvas.Handle, HALFTONE);
то что нужно. во только под 98 почему то не пашет. На XP все ок.
Пробовал так вызывать, результат ноль.
Про поддержку в 98 там ничего не сказано стало быть должно работать.
GetBrushOrgEx(tbm_min.Canvas.Handle, pt) then
SetStretchBltMode(tbm_min.Canvas.Handle, HALFTONE);
SetBrushOrgEx(tbm_min.Canvas.Handle,pt.X,pt.Y,@pt);
   StretchBlt(tbm_min.Canvas.Handle,0,0,150,150,bm_min.Canvas.Handle,0,0,bm_min.Width,bm_min.Height,SRCCOPY);
Кто нибудь работал с ней?


 
Думкин ©   (2005-03-15 07:52) [5]

> [4] Tirex   (14.03.05 18:34)

SetStretchBltMode - HALFTONE

This option is not supported on Windows 95/98/Me.


 
Tirex   (2005-03-15 21:56) [6]

да я уже прочел, спасибо.



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

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

Наверх




Память: 0.45 MB
Время: 0.072 c
6-1112615487
NikeOLD
2005-04-04 15:51
2005.07.11
Можно ли получить список модемов не используя реестр (как?)


1-1118420101
Pav
2005-06-10 20:15
2005.07.11
Работа с файлами в Delphi


14-1118214604
Ozone
2005-06-08 11:10
2005.07.11
Symantec GHost 7.5.0.335


14-1117931066
FVlad
2005-06-05 04:24
2005.07.11
Delphi или Basic


3-1117040772
_dimka
2005-05-25 21:06
2005.07.11
Как увидеть добавленную запись не переоткрывая запрос? (IBX)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский