Модераторы: Snowy, Alexeis, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как ументшить размер PNG картинки??? 
:(
    Опции темы
WaReZMEN
Дата 2.3.2009, 09:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Необходимо сжать PNG  изображения с 158х158 до 16х16 (158х200 до 16х20). Гуглил находил кучу лажи которая даже не работает. 
PM MAIL ICQ   Вверх
Alexeis
Дата 2.3.2009, 10:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459
WaReZMEN, а bmp умеешь сжимать?


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
MetalFan
Дата 2.3.2009, 10:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 5
Всего: 128
варианта вижу два:
1. с использованием TPNGImage (но вроде это только декодер?)
2. с использованием GDI+.


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
WaReZMEN
Дата 2.3.2009, 10:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Alexeis, могу но это не вариант... я конвертировать замучаюсь у меня этих картинок по 100 штук и все постоянно будут конвертироваться еще.... долго во общем...

MetalFan, не шибко левые компоненты можно юзать... проект коммерческий...
PM MAIL ICQ   Вверх
WaReZMEN
Дата 2.3.2009, 11:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Сделал так Canvas.StretchDraw(Rect, png)
PM MAIL ICQ   Вверх
Alexeis
Дата 2.3.2009, 11:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459
WaReZMEN, маладца, учитывая то что ты все равно преобразовал png в bmp и при этом потерял прозрачность + неявно воспользовался TPNGImage  smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
WaReZMEN
Дата 2.3.2009, 12:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Alexeis, я б и рад заюзать TPNGImage но у вы его нету да и сказали что максимум что можно это TPNGObject.  А прозрачность и не нужна была...

Цитата(Alexeis @  2.3.2009,  19:27 Найти цитируемый пост)
ты все равно преобразовал png в bmp

А куда деваться то smile  smile 
PM MAIL ICQ   Вверх
Alexeis
Дата 2.3.2009, 13:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459
Цитата(WaReZMEN @  2.3.2009,  11:54 Найти цитируемый пост)
TPNGImage но у вы его нету да и сказали что максимум что можно это TPNGObject

  Это одно и тоже PNGImage это пакет с TPNGObject, его включили в дефолтную поставку в 2007й если картинка png то автоматом создается TPNGObject.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
WaReZMEN
Дата 2.3.2009, 14:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Alexeis, у меня 2006.... к то муже в юните pngimage.pas у меня нету TPNGImage. Потому как версия не из последних... а как говорил выше новую юзать не могу... к стате при StretchDraw куда то пропадает 1 пиксель картинки с низу не знаете как обойти?
PM MAIL ICQ   Вверх
MetalFan
Дата 2.3.2009, 14:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 5
Всего: 128
пользуй GDI+, там все норм ресайзится (касательно PNG).


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
WaReZMEN
Дата 2.3.2009, 14:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
MetalFan, а поподробнее????  smile 
PM MAIL ICQ   Вверх
MetalFan
Дата 2.3.2009, 15:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 5
Всего: 128
берешь юниты для делфей для работы с GDI+.
в uses прописываешь GDIPOBJ, GDIPAPI, GDIPUTIL.
прототип кода для "ресайза":
Код

var
  lGPImgSrc: TGPImage;
  lGPImgDst: TGPBitmap;
  lGPGraph: TGPGraphics;
  lEnc: TGUID;
begin
  lGPImgSrc := TGPImage.Create('Test.png');
  lGPImgDst := TGPBitmap.Create(50, 50);
  lGPGraph := TGPGraphics.Create( lGPImgDst );
  lGPGraph.DrawImage( lGPImgSrc, 0,0, 50, 50 );
  GetEncoderClsid('image/png', lEnc);
  lGPImgDst.Save('Test2.png', lEnc);



--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Alexeis
Дата 2.3.2009, 15:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459
WaReZMEN, http://www.progdigy.com/files/gdiplus.zip куча примеров в архиве.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
WaReZMEN
Дата 2.3.2009, 15:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Спасибо всем!!!
PM MAIL ICQ   Вверх
WaReZMEN
Дата 2.3.2009, 16:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 683
Регистрация: 9.6.2006
Где: Россия, Санкт-Пет ербург

Репутация: нет
Всего: 3
Alexeis, что то не компилется 
Type 'IDirectDrawSurface' needs finalization - not allowed in variant record
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

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

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

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

FAQ раздела лежит здесь!

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

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


 




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


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

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