Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Вниз

TJpegImage 


Belov   (2002-01-14 14:52) [0]

Привет всем ! не подскажите как программно можно изменить размер картинки
Только, плиз, если не сложно, приведите пример



belobadgo   (2002-01-14 15:16) [1]

TJPEGImage.Scale - может принимать значения:
jsFullSize - размер картинки 1:1
jsHalf - 1:2
jsQuarter - 1:4
jsEighth - 1:8

Следовательно: берем картинку, меняем ее размер, кол-во цветов и сохраняем в новом виде. В принципе и растянуть можно...



Belov   (2002-01-14 15:59) [2]

ОК. А как задать картинке какой-то определенный размер например с 320х200 привести к размеру скажем 120х50



belobadgo   (2002-01-14 16:32) [3]

Я делал так (примитивно конечно, но до большего не додумался...): у исходной картинки берешь длину и ширину, считаешь коэффициентик - длина/ширина. Далее в TImage задашь один нужный тебе параметр, а второй высчтитываешь по коэффициенту. Грузишь туда свою picture. Значение Image.strach=true и получаешь уменьшенный вариант своей картинки. Переводишь в JPEG, и работаешь дальше...
ВАЖНО: нарушение пропорции длина/ширина приведет не только к уменьшению размера картинки, но и к ее искажению...



Yuraz   (2002-01-14 18:26) [4]

Перегоняешь в BMP, с ним делаешь что хочешь, далее опять преобразуешь в JPEG. (Почаще делай поиск в FAQ, там это есть, сам искал 3 нед назад)



DK   (2002-01-15 01:57) [5]

Можешь через BitBlt рисовать. Только у него некоторые глюки при уменьшении (или это только у на моём компе ?)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.015 c
3-99848           Тов_Санек             2001-12-26 11:07  2002.01.31  
ProgressBar and Query


1-100004          Slavan                2002-01-14 13:35  2002.01.31  
Панель окон


4-100104          Romul                 2001-12-02 10:59  2002.01.31  
Узнать количество файлов с помощью API


3-99892           Dorixe                2001-12-28 08:50  2002.01.31  
SQL Trouble Поиск


1-99964           shelest               2002-01-14 11:34  2002.01.31  
Grid и его разновидность.