Xpoint
   [напомнить пароль]

Работа с изображениями: История

Внимание! Данный интерфейс находится в стадии глубокой переделки. Наберитесь терпения.

Последнее изменение

11 лет назад Иванов Михаил aka Ivanych[досье] изменил текст:
Текст: return undef;¶

$image->Write($tpath);¶
>>>¶

= Изготовление превьюшек (thumbnails) при помощи модуля GD¶
<<<(perl)¶
# подразумеваем, что:¶
# $path - полный путь к оригинальному изображению¶
# $tpath - полный путь, куда мы хотим сохранить превьюшку¶

use GD;¶

# Чтение исходной картинки (1 - полноцветный режим)¶
$src = newFromJpeg GD::Image($path,1);¶

# Создание уменьшенной картинки ($x - ширина, $y - высота, 1 - полноцветный режим)¶
$dst = new GD::Image($x,$y,1);¶

# Копирование картинки из оригинальной в уменьшенную (copyResampled - качественнее, copyResized - быстрее)¶
$dst->copyResampled($src,0,0,0,0,$dst->getBounds(),$src->getBounds());¶

# Запись уменьшенной картинки в файл ($q - качество, от худшего 0 до лучшего 100)¶
open (DST,">$tpath");¶
binmode DST;¶
print DST $dst->jpeg($q);¶
close DST;¶
>>>

История предыдущих изменений

изменения дата автор
текст 2005-11-11 15:17:57 (11 лет назад) Иванов Михаил aka Ivanych[досье]
текст 2005-03-16 12:40:42 (12 лет назад) Владимир Палант[досье]
текст 2005-03-16 09:36:18 (12 лет назад) Андрей Новиков[досье]
RSS
Powered by POEM™ Engine Copyright © 2002-2005