|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Простое преобразование JPG в BMP (PNG, GIF) и обратно. Минимизация EXE - файла
Программа изменяет размеры всех фото (JPG) в выбранной папке и её подпапках до до указанной ширины (высота установится сама).
Алгоритм работы программы: 1.поиск первого файла JPG 2.загрузка JPG в буфер 3.преобразование JPG в BMP 3.масштабирование BMP 4.обратное преобразование BMP JPG 5.сохранение JPG в файл Малый размер(21кб) достигнут использованием WinAPI, GDI+ и почти 2-х кратным сжатием программой upx.exe. dialog_resizer1.jpg Скачать EXE (MiniFotoResizer.zip) на http://kachkarvv.ru/download/files-delphi.php Исходники (бесплатно) на http://kachkarvv.ru/faq/src-delphi/d...otoResizer.htm Последний раз редактировалось kachkarvv, 08.08.2012 в 15:05. |
#2
|
||||
|
||||
Используются WinAPI и функции Ole ( uses ActiveX ).
Программа загружает файл с именем CLOCK.jpg преобразует его BITMAP и отображает в созданном окне. Исходники на http://kachkarvv.ru/faq/src-delphi/delphi-img-ole.htm P.S. Если переименовать любой файл формата JPG, GIF или BMP в CLOCK.jpg, то результат не изменится. Последний раз редактировалось kachkarvv, 08.08.2012 в 15:06. |
#3
|
||||
|
||||
Улучшил внешний вид.
Улучшил внешний вид за счёт загрузки JPG-рисунка из ресурсов.
здесь и на своём сайте всё обновил. |
#4
|
||||
|
||||
Я бы еще мелкий функционал добавил. Добавление бордюра заданного цвета заданной ширины в % или пикселях. Т.е. есть скажем фото 300х240 я добавляю бордюр голубого цвета в 15% от оригинала. Получается фото размером 345х276, где исходное фото в центре, а вокруг него бордюр голубого цвета.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
||||
|
||||
Бывает так-же необходимость наоборот порезать фото на нужное количество кусков. Скажем имеем картинку размером 4000х16000 и надо получить из нее четвертушки т.е. 4 картинки размером 1000х4000
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |