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

Вниз

Графика, вставка с масштабированием   Найти похожие ветки 

 
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]

Все работает. О.К. Спасибо всем !! :)



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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
14-52651
atmospheric
2001-11-22 18:07
2002.01.17
Cитуация морального выбора


1-52602
ЗЛОБНЫЙ КАРЛИК
2001-12-27 13:11
2002.01.17
String-TStrings. String-PChar. PChar-TStrings!!!! HEEEEELP!


14-52654
Tosov
2001-11-22 00:37
2002.01.17
http://delphi.mastak.ru/articles/advises/index.html


1-52587
Igor_thief
2001-12-28 15:49
2002.01.17
WallPapers


14-52650
paul_shmakov
2001-11-21 01:13
2002.01.17
подсветка синтаксиса в форуме