Timage как не терять качество при изменении размеров? - Компоненты Delphi

Человек_Борща · 31.05.2014, 00:14

Доброго времени!

Ситуация:
Есть TImage,
Center : true
Autosize: true,
Proportional: true
в него загружен BitMap:

Как только меняешь размер формы, картинка портится до нельзя:

Картинка: 500x400, заведомо меньше минимальных размеров окна программы.

Как это лечить?

Vapaamies · 31.05.2014, 00:28

Сделать так, чтобы менялся размер самого TImage, заставляя масштабировать картинку именно ему, а не форме. Например, выставить Align = alClient и Stretch = True.

doktor255 · 31.05.2014, 00:51

Сомневаюсь что это поможет. Окно настроек уменьшения изображения в PaintNET. Думаю от этой точки и нужно отталкиваться, и писать свою перерисовку.

Stilet · 31.05.2014, 17:56

М.м.м... Увы проекта не сохранилось, но я так делал используя GDI+.
Хотя вроде я тут на форуме компонентик самописный выкладывал (http://www.programmersforum.ru/showthread.php?p=560217)

N0iD · 02.06.2014, 20:41

Я для подобного использовал Graphics32 идет с примерами в том числе и с подобным ресайзом с применением разных алгоритмов сглаживания.
Прикладываю скомпилированный пример .
Там можно и вертеть и менять размер и т д.
Если ваши поиски Graphics32 не увенчаются успехом, я выложу компонент для вас.
К слову очень крутая по возможностям штука.

Stilet · 02.06.2014, 20:44

Интересно кстати может в Fire Monkey таких проблем не будет?

Smitt&Wesson · 02.06.2014, 21:07

Вот этот код, уменьшает картинку без потери качества. Правда, он не на Паскале а на С++ Builder.

Vapaamies · 02.06.2014, 23:43

Вот этот вот StretchDraw и вызывается внутри TImage, если выставить ему Stretch := True.

31.05.2014, 00:14	#1
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,426	Timage как не терять качество при изменении размеров? Доброго времени! Ситуация: Есть TImage, Center : true Autosize: true, Proportional: true в него загружен BitMap: Как только меняешь размер формы, картинка портится до нельзя: Картинка: 500x400, заведомо меньше минимальных размеров окна программы. Как это лечить?

31.05.2014, 17:56	#4
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	М.м.м... Увы проекта не сохранилось, но я так делал используя GDI+. Хотя вроде я тут на форуме компонентик самописный выкладывал (http://www.programmersforum.ru/showthread.php?p=560217) I'm learning to live...

02.06.2014, 20:44	#6
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Интересно кстати может в Fire Monkey таких проблем не будет? I'm learning to live...

02.06.2014, 21:07	#7
Smitt&Wesson Старожил Регистрация: 31.05.2010 Сообщений: 13,543	Вот этот код, уменьшает картинку без потери качества. Правда, он не на Паскале а на С++ Builder. Пиши пьяным, редактируй трезвым. Справочник по алгоритмам С++ Builder

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Изменение размеров timage при изменении размера формы	WebbMan	C++ Builder	5	26.02.2013 21:14
При изменении размеров Timage canvas не увеличивается	BloodMaX	Общие вопросы Delphi	1	15.04.2010 12:28
создать timage определенных размеров	varelik	Общие вопросы Delphi	6	12.02.2010 15:07
Как изменять размеры шрифта при изменении размеров canvas?	SkAndrew	Мультимедиа в Delphi	2	07.12.2008 23:02
Текст при изменении размеров окна	Dj_smart	HTML и CSS	2	25.11.2008 23:23

31.05.2014, 00:28	#2
Vapaamies Ваш К. О. Участник клуба Регистрация: 26.12.2012 Сообщений: 1,770	Сделать так, чтобы менялся размер самого TImage, заставляя масштабировать картинку именно ему, а не форме. Например, выставить Align = alClient и Stretch = True.

02.06.2014, 23:43	#8
Vapaamies Ваш К. О. Участник клуба Регистрация: 26.12.2012 Сообщений: 1,770	Вот этот вот StretchDraw и вызывается внутри TImage, если выставить ему Stretch := True.