ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
14 сообщений из 14, страница 1 из 1
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670248
san7667
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
san7667
Гость
Доброго времени суток!
Помогите пожалуйста!!!!!

Бьюсь уже долгое время. Есть программа которая открывает веб камеру, при нажатии на кнопку работает процедура фотофиксации изображения и сохранения в bmp файл (весит 900 kb), необходимо его минимально сжать без потери качества , делал через jpeg, записывал bmp в jpeg, сжимал до 137kb, но при перезаписи сжатого jpeg в bmp возрашается исходный размер bmp файла 900 kb
код:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
bmp:= Tbitmap.Create;
jpeg := TJpegImage.Create;
bmp.PixelFormat:=pf24bit;
bmp.LoadFromFile(name);
jpeg.Assign(bmp);
jpeg.CompressionQuality :=100;
jpeg.Compress;    
jpeg.SaveToFile(name);  // сжал и сохранил в размере 137 kb
jpeg.LoadFromFile(name);
bmp.Assign(jpeg); // записал файл но размер снова 900 kb
datamodule1.q_picture.fieldbyname('BITMAP').assign(bmp);



Модератор: Пользуйтесь тегом (кнопкой) SRC для оформления кода, пожалуйста.
...
Рейтинг: 0 / 0
05.07.2018, 18:57
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670250
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
san7667необходимо его минимально сжать без потери качестваsan7667делал через jpeg,Уже смешно.

Почему не хотите использовать архиватор?
...
Рейтинг: 0 / 0
05.07.2018, 19:05
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670251
san7667
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
san7667
Гость
Никогда не работал с изображениями
Подскажите примерчик
...
Рейтинг: 0 / 0
05.07.2018, 19:09
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670255
Мимопроходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Мимопроходящий
Участник
у FIB+ есть функция сжатия потока BLOB.
если склероз меня не подводит.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
05.07.2018, 19:11
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670263
san7667
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
san7667
Гость
Мимопроходящий, Похоже в моем случае нет, на превью в поле блоб (лезу в ibexpert) показывет размер в байтах 921564, то есть примерно 900 kb
Легче было сделать конечно ссылку на изображение, а потом по ней выводить куда нибудь в timage, но эти фото в отчет идут fast report
...
Рейтинг: 0 / 0
05.07.2018, 19:31
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670307
Фотография Virtual Student
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Virtual Student
Участник
san7667но при перезаписи сжатого jpeg в bmp возрашается исходный размер bmp файла 900 kb

А как должно быть?
...
Рейтинг: 0 / 0
05.07.2018, 21:37
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670314
Соколинский Борис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Соколинский Борис
Участник
san7667необходимо его минимально сжать без потери качества , делал через jpeg...
При сжатии в jpeg всегда происходит потеря качества, даже при качестве 100%.
В JPEG без потерь (loseless JPEG) используется другой алгоритм, который, ЕМНИП в штатной реализации отсутствует.
Насчет потери качества - какие объекты фотографируются?
...
Рейтинг: 0 / 0
05.07.2018, 22:04
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670319
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
san7667превью в поле блоб (лезу в ibexpert) показывет размер в байтах 921564, то есть примерно 900 kbКак не сложно это признать, но это необходимо сделать - это ты туда его таким и записываешь, а не 137kb. Придется искать ошибку в логике своей программы.

Конечно, логичнее было бы предположить, что это подлый Firebird при чтении блоба автоматически конвертирует его содержимое из jpeg обратно в bmp, но нет.

P.S. Используй 7-zip. Жать будет гораздо лучше и реально без потери качества.
...
Рейтинг: 0 / 0
05.07.2018, 22:16
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670351
AJi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AJi
Гость
Подскажите пещерному человеку, зачем хранить изображения в базе?
...
Рейтинг: 0 / 0
05.07.2018, 23:44
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670354
Соколинский Борис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Соколинский Борис
Участник
AJi,
это вечный холивар.
Есть, как минимум, один плюс - не надо ломать голову с откатом транзакции.
...
Рейтинг: 0 / 0
05.07.2018, 23:47
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670356
AJi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AJi
Гость
ну да, из-за такого плюса имеет смысл их туда запихивать да еще и без потери качества:)
...
Рейтинг: 0 / 0
05.07.2018, 23:49
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670361
bk0010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bk0010
Участник
YuRockКонечно, логичнее было бы предположить, что это подлый Firebird при чтении блоба автоматически конвертирует его содержимое из jpeg обратно в bmp, но нет.Firebird не "уиноуатый", конвертация происходит вот тут:
Код: pascal
1.
bmp.Assign(jpeg);

.
И bmp будет 900 кб, чем бы он не жал, до тех пор, пока размеры картинки и цветность не изменятся: должна быть отображена каждая точка изображения с заданным разрешением по цветности, откуда берется картинка и сколько в ней реально цветов роли не играет. ИМХО, конечно.
...
Рейтинг: 0 / 0
06.07.2018, 00:01
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670434
alfangur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alfangur
Гость
1. не храните изображения в бд.
2. используйте png.
...
Рейтинг: 0 / 0
06.07.2018, 08:57
| Ответить | Цитировать | Написать  
Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
    #39670439
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
alfangur1. не храните изображения в бд.

дурацкая мысль.
...
Рейтинг: 0 / 0
06.07.2018, 09:05
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Уменьшение размера файла BMP для загрузки в БД FB 2.5.3 (BLOB)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39670354&tid=2040655]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 224ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 241ms
total:  534ms
созд. / загр.: 534ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]