Как можно уменьшить размеры картинки без потери качества?
(посоветуйте библиотеку или способ, как это сделать)

Делаю через StretchDraw:

         My_Ratio := RequiredWidth / SourceSize.Width;
         MyBMP.PixelFormat := pf24bit;
         MyBMP.Width := Round(My_Ratio * SourceSize.Width);
         MyBMP.Height := Round(My_Ratio * SourceSize.Height);
         MyBMP.Canvas.(Rect(0, 0, MyBMP.Width, MyBMP.Height), pic.Graphic);

Картинка меняет размеры, но становится такой нечеткой, неразборчивой :(

> Как можно уменьшить размеры картинки без потери качества?

Никак. На то оно и уменьшение :)

> посоветуйте библиотеку

Graphics32. Посмотри Demo-проекты.

> ЮЮ ©   (14.06.07 05:40) [2]
>
> > посоветуйте библиотеку
>
> Graphics32. Посмотри Demo-проекты.


Там так много классов... какой смотреть?

> Graphics32. Посмотри Demo-проекты.

Автор, не поддавайся! Он умньшит качество твоих картинок.

> Там так много классов... какой смотреть?

Хватит и базового: TBitmap32.
1) загрузи картинку в один, второй сделай нужного размера и попробуй TBitmap32.DrawTo(Dst: TBitmap32) c разными StretchFilter
2) попробуй procedure StretchNearest из GR32_Transforms
3) для начала просто загрузи в TImage32 cj ScaleMode = smStretch и поизменяй прямо в дизайне. Попробуй и разные TImage32.Bitmap.StretchFilter

> ЮЮ ©   (15.06.07 06:37) [5]


Graphics32 - оказалось то, что нужно.
Применяя TLinearResampler, получил эффект, который желал.

Спасибо!

напишите пример ,ато целый день сегодня провозился так и не получилося,
есть файлик 1.jpg нужно уменьшить до 150 на 100 и сохранить TlinearResampler

кто первий напишет рабочий вариант зразу напишите кошельок WMZ

всем спасибо нашол из janFX
 первоисточник  http://programania.com/stretch.zip ищо лутше