Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];
Вниз
Графика, вставка с масштабированием
vbazik (2001-12-23 16:44) [0]Кто подскажет
есть image1,image2
взять из image2 фрагмент и вставит его в image1 c увеличением(уменьшением) с масштабом М<>1
Можно конечно с прореживанием пикселов (или их дублированием) но это не в кайф. Кто знает путь короче помогите. Заранее спасибо
:-)
DK (2001-12-24 02:57) [1]BitBlt + F1
vbazik (2001-12-24 11:20) [2]Кажется такой подробный ответ я уже на форуме видел ;-)
Но все равно спасибо :)
MIg (2001-12-24 11:38) [3]Вот как я сделал:
ZoomImg.Canvas.CopyRect(Rect(0,0,863,610),KartaImg.Canvas,Rect(xclick,yclick,x,y));
KartaImg - это где я мышкой выделяю окошко на карте
ZoomImg - Image, где я получаю растянутое изображение выделенного куска.
Получается совсем не плохо.
Владимир Васильев (2001-12-24 12:43) [4]Если желаете масштабировать качественно - с кубической или выше интерполяцией - воспользуйтесь JCL : http://www.delphi-jedi.org
>>
procedure Stretch(NewWidth, NewHeight: Cardinal; Filter: TResamplingFilter;
Radius: Single; Source, Target: TBitmap);
Параметр Filter позволяет изменять условия интерполяции :
TResamplingFilter = (sfBox, sfTriangle, sfHermite, sfBell, sfSpline,
sfLanczos3, sfMitchell);
vbazik (2001-12-27 23:30) [5]Все работает. О.К. Спасибо всем !! :)
Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];
Память: 0.72 MB
Время: 0.024 c
