Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.03.2010, 23:17   #1
AnKor94
Пользователь
 
Регистрация: 24.11.2009
Сообщений: 54
Вопрос Нужно уменьшить размер изображения.

Нужно открыть файл 123.jpg с разрешением 1024*768 пикселей, находящийся в C:\123.jpg; уменьшить его размер так, чтобы его высота и ширина не превышали 200 пикселей и сохранить как C:\123small.jpg

У кого какие соображения как это реализовать?
Заранее благодарю
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
AnKor94 вне форума Ответить с цитированием
Старый 07.03.2010, 23:26   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

1. Открыть в TImage (с подключенным в uses Jpeg)
2. Задать нужные размеры (Height, Width для TImage, с включенным Stretch)
3. Сохранить

З.Ы. Скачайте себе
http://programmersclub.ru/files/book1_100comp.rar
и много элементарных вопросов отпадут сами собой (даже с табуретки спрыгивать не нужно )
mihali4 вне форума Ответить с цитированием
Старый 07.03.2010, 23:47   #3
AnKor94
Пользователь
 
Регистрация: 24.11.2009
Сообщений: 54
По умолчанию

"Вроде как надо сначала создать Bitmap, загрузить в него Canvas TImage'а, а потом присвоить полученный Битмап в Picture Image'а"

прочитал на другом форуме

это так или нет? просто сейчас нет возможности проверить
141.116.168.135 : damiu2d449028.dami.army.pentagon.mi l (.MIL | US Military)
AnKor94 вне форума Ответить с цитированием
Старый 08.03.2010, 00:21   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Смотрите соседнюю тему
http://www.programmersforum.ru/showthread.php?t=87246

И учитесь использовать поиск форума.
mihali4 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
уменьшить размер книги.xls ruavia3 Microsoft Office Excel 16 30.05.2011 12:05
Уменьшить размер ячеек в STRINGGRID cowboy Помощь студентам 1 08.02.2010 11:54
Как уменьшить размер сборки? Д'якон Общие вопросы Delphi 12 03.09.2009 11:18
Как уменьшить размер PNG изображения? highklass Мультимедиа в Delphi 5 31.05.2008 16:24
уменьшить размер БД MS Access Кот из Лета БД в Delphi 7 30.12.2007 13:51