Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Вниз

Сохранение картинки в файл: БитМап VS Jpeg   Найти похожие ветки 

 
Игоръ ©   (2004-11-18 11:28) [0]

Возникла проблема - необходимо сохранять картинки (TImage), которые создает программа.
Я нашел стандартную процедуру myImage.Picture.SaveToFile(FileName), НО так как у меня очень большие размеры картинок, то картинки занимают очень много места (до 30Mb/картинка). А картинок мне надо сотни... Вообщем 30Гб забивается за 6 часов.

Вчера в форуме мне посоветовали TJpegImage.
Я создал процедуру:
procedure TmyForm.Save_Jpeg (Sender: Tobject; sPATH : string);
var jpg : TJPEGImage;
begin
 jpg := TJPEGImage.Create;
 jpg.CompressionQuality := jpgQual;
 jpg.Assign((Sender as TImage).Picture.Bitmap);
 jpg.SaveToFile(sPATH);
 jpg.Free;
end;


И тут обнаружилась проблема - Время. По сравнению с обычным сохранением у меня каждый шаг просчитывает в 2 раза дольше.
Я связываю это с jpg.Assign. Как я понял программа держит в памяти картинку присвоенную с помощью Assign, а так как картинка большая - это занимает время.

Что можно придумать???
Если использовать стандартную процедуру мне необходимо ГигаБайты HDD, а если JPEG, то программа считает вместо 10-12 часов более суток.


 
Amoeba ©   (2004-11-18 11:31) [1]

К сожалению, за все приходится платить: за меньший объем - большим временем, а за меньшее время - большим объемом. Своего рода "закон сохранения".


 
ЮЮ ©   (2004-11-18 11:34) [2]

jpg.SaveToFile(sPATH); т.к. картинка преобразуется в jpg, то это тоже требует время.

А ты чего хотел? Или время или дисковое пространство?
А что за картинки? Может без потери качества достаточно 4битовой глубины вместо 32битовой?


 
Amoeba ©   (2004-11-18 11:39) [3]


> Может без потери качества достаточно 4битовой глубины вместо
> 32битовой?

16 цветов, скорее всего будет маловато. А насчет 8-битовой глубины (256 цветов) определенно стоило бы подумать.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.033 c
4-1098200620
crio
2004-10-19 19:43
2004.12.05
Работа со сканером


14-1100775154
syte_ser78
2004-11-18 13:52
2004.12.05
С первым снегом, харьковчане!


9-1091467989
P@uk
2004-08-02 21:33
2004.12.05
Движение и торможение


1-1100765774
КиТаЯц
2004-11-18 11:16
2004.12.05
AdobeAcrobatReader


14-1100798599
Ihor Osov'yak
2004-11-18 20:23
2004.12.05
Я в шоке...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский