Уменьшеть картинку

← →
Lordalexander © (2006-03-17 15:04) [0]

Добравого времени суток уважаймые професеоналы. Подскажите пожалуйста как можно подогнать рисунок jpg под размеры маего TImage1 к примеру есть картинка 700 на 400 надо ее уменьшить до 500 на 300

← →
Eraser © (2006-03-17 15:06) [1]

> Lordalexander © (17.03.06 15:04)

StretchBlt

← →
Lordalexander © (2006-03-17 15:14) [2]

Это что? можно поподробней пожалуйста ....

← →
Eraser © (2006-03-17 15:38) [3]

> Lordalexander © (17.03.06 15:14) [2]

смотри в MSDN или справочной системе, которая с Delphi в поставке.

← →
clickmaker © (2006-03-17 16:01) [4]

TImage.Stretch как вариант

← →
Lordalexander © (2006-03-17 16:13) [5]

Спасибо все работает

http://stas258.narod.ru/frame/download/Compressor.zip Оттуда можно более универсальную функцию вырезать

← →
ivane (2006-03-19 03:14) [7]

Вцелом этот метод неплох, но возможно тебе понадобится изменить размеры битмапа, тогда воспользуйся методом канвы СopyRect.

Уменьшеть картинку Найти похожие ветки