Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как можно уменьшить размер изображения? Компонент Image 
V
    Опции темы
Voronin_Igor
Дата 7.2.2009, 15:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
Люди помогите! Пишу прогу одна из функций которой это просмотр и уменьшение изображения.
С просмотром все понятно
Код

Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);

Уменьшать получается только на форме меняя Width и Height, а при сохранении размер остается прежний  smile 



 
PM MAIL   Вверх
SenkraD
Дата 7.2.2009, 16:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 933
Регистрация: 3.2.2006
Где: Украина::Киев

Репутация: 9
Всего: 23
попробуй так:
Код

image1->Picture->Width = 100;
image1->Picture->Height = 100;
image->Picture->SaveToFile( SavingPath );



--------------------
 Имеющий язык - да не убоится спросить! 
user posted image
PM MAIL ICQ   Вверх
Dmi3ev
Дата 7.2.2009, 16:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: 16
Всего: 41
Развеселил  smile там TBitmap нужно...

Добавлено через 42 секунды
SenkraD, я про автора...


--------------------
PM MAIL   Вверх
Voronin_Igor
Дата 7.2.2009, 16:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
Цитата(SenkraD @  7.2.2009,  14:03 Найти цитируемый пост)

image1->Picture->Width = 100;
image1->Picture->Height = 100;
image->Picture->SaveToFile( SavingPath );

Это я пробовал уменьшает только в форме. 
а файл остается без изменений   
PM MAIL   Вверх
taiven
Дата 7.2.2009, 16:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 302
Регистрация: 30.6.2008

Репутация: 3
Всего: 9
Код

Image1->Picture->LoadFromFile("C:/1.bmp");
Image1->Picture->Bitmap->Width = 100;
Image1->Picture->Bitmap->Height = 100;
Image1->Picture->SaveToFile("C:/2.bmp");
PM   Вверх
Dmi3ev
Дата 7.2.2009, 23:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: 16
Всего: 41
Этот уменьшит картинку, но при этом он ее обрежет...


--------------------
PM MAIL   Вверх
Voronin_Igor
Дата 8.2.2009, 00:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
спасибо попробую!

Добавлено через 2 минуты и 9 секунд
а нет никакой функции для сжатия файла?  
PM MAIL   Вверх
Voronin_Igor
Дата 8.2.2009, 15:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
Цитата(taiven @  7.2.2009,  14:26 Найти цитируемый пост)
Image1->Picture->LoadFromFile("C:/1.bmp");
Image1->Picture->Bitmap->Width = 100;
Image1->Picture->Bitmap->Height = 100;
Image1->Picture->SaveToFile("C:/2.bmp");

это все хорошо а как быть с JPG
второй день пробую и никаких результатов в основном пишет что не может перевести форматы  smile 
PM MAIL   Вверх
THandle
Дата 8.2.2009, 16:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 25
Всего: 372
Можно попробовать уменьшить через Canvas->StretchDraw()
PM   Вверх
Dmi3ev
Дата 8.2.2009, 17:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

Репутация: 16
Всего: 41
Цитата

это все хорошо а как быть с JPG

если так же вырезать часть картинки, то тогда вот так:
Код

TJPEGImage * n=new TJPEGImage();
Graphics::TBitmap * temp=new Graphics::TBitmap();
n->LoadFromFile("D:\\N70_5.jpg");
temp->Assign(n);
temp->Width=100;
temp->Height=100;
temp->SaveToFile("D:\\1.bmp");

конечно, подключить jpeg.hpp

Это сообщение отредактировал(а) Dmi3ev - 8.2.2009, 22:44


--------------------
PM MAIL   Вверх
Voronin_Igor
Дата 10.2.2009, 12:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
Спасибо почти так я уже пробовал. мне нужно что бы изображение не обрезалось, а уменьшалось с сохранением пропорций как на формах если уменьшаешь размер то уменьшается вся картика нужно только выставить свойство proport smile ional=true   
PM MAIL   Вверх
seawolf
Дата 10.2.2009, 15:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 30.1.2009

Репутация: нет
Всего: нет
Подцепи в проект freeimage. Там тебе и масштабирование и поворот и обрезание и чего только нету. Все популярные форматы и Jpeg2000 в том числе. У проекта есть своя страница в сети (ссылку не помню думаю что ввести freeimage.dll будет достаточно)
PM MAIL   Вверх
Voronin_Igor
Дата 10.2.2009, 17:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
спасибо обязательно попробую
PM MAIL   Вверх
Voronin_Igor
Дата 23.2.2009, 14:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 38
Регистрация: 14.7.2008
Где: Петрозаводск

Репутация: нет
Всего: нет
Цитата(THandle @  8.2.2009,  14:38 Найти цитируемый пост)
Можно попробовать уменьшить через Canvas->StretchDraw()

Спасибо помогло все отлично работает smile 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.3245 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.