Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Графика и игры
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Закрытая тема
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 20.09.2008, 00:24
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию Изменение размера изображения со сглаживанием

Мне нужно, чтобы после изменения размера изображения производилось сглаживание (Blur). Изменение размера - элементарно, StretchDraw. А вот блюр - проблема. Нашёл в Интернете пример, но его код делает не блюр, а недорозумение (изображение размывается). Причём при этом радиус блюра равен 1. Тип Real код не воспринимает. Нашёл на DS ещё один пример, вроде работает нормально, но мне нужен только блюр. Сколько не пытался. Вот этот пример. Кто может, создайте проект с одним только созданием блюра (один Button и Image) и выложите сюда.
P.S. Если есть другие варианты, то предлагайте.
__________________

  #2  
Старый 20.09.2008, 01:29
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,026
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Посмотри либу gfx_effects.
  #3  
Старый 20.09.2008, 10:52
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию

Нет, не хочу использовать сторонние компоненты. Мне нужен код.
__________________

  #4  
Старый 20.09.2008, 22:17
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию

Разве никто не знает как это сделать?
__________________

  #5  
Старый 22.09.2008, 13:22
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Считал, что Blur это и есть размытость. Видел пример для Motion Blur. Выдаётся чёткое изображение движущегося предмета, а за ним несколько бледных (альфа, прозрачность). Что касается сглаживания, надо бы пример формулы. Возможно, имеется в виду двумерная апроксимация. А уж по одномерной функций немеренно. Можно взять цифровой НЧ-фильтр. Кстати, такое понятие, как контрастность тоже в некотором смысле влияет на сглаживание.
  #6  
Старый 22.09.2008, 13:22
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Считал, что Blur это и есть размытость. Видел пример для Motion Blur. Выдаётся чёткое изображение движущегося предмета, а за ним несколько бледных (альфа, прозрачность). Что касается сглаживания, надо бы пример формулы. Возможно, имеется в виду двумерная апроксимация. А уж по одномерной функций немеренно. Можно взять цифровой НЧ-фильтр. Кстати, такое понятие, как контрастность тоже в некотором смысле влияет на сглаживание.
  #7  
Старый 22.09.2008, 13:39
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,564
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Winny
Мне нужно, чтобы после изменения размера изображения производилось сглаживание (Blur). Изменение размера - элементарно, StretchDraw. А вот блюр - проблема. Нашёл в Интернете пример, но его код делает не блюр, а недорозумение (изображение размывается). Причём при этом радиус блюра равен 1. Тип Real код не воспринимает. Нашёл на DS ещё один пример, вроде работает нормально, но мне нужен только блюр. Сколько не пытался. Вот этот пример. Кто может, создайте проект с одним только созданием блюра (один Button и Image) и выложите сюда.
P.S. Если есть другие варианты, то предлагайте.
Еще вариант: http://www.delphisources.ru/pages/so...g-picture.html
  #8  
Старый 22.09.2008, 19:33
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию

Помог модуль JanFX. Тему можно закрывать. Всем спасибо.
P.S. Файлы из архива положите в папку с исходниками вашей программы и просто подключите модуль JanFX в uses.
Вложения
Тип файла: rar JanFX.rar (49.0 Кбайт, 152 просмотров)
__________________

Закрытая тема


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:34.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter