Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

bmp в jpg и наоборот

1.5K
17 февраля 2004 года
AndySPb
58 / / 11.04.2003
Собственно вопрос то я уже задал :) Предположим у меня есть Image, в который я гружу битмап. А потом мне его сохранить хотелось бы в формате jpg. Но потом еще и после прочения его с диска, преобразовать опять в битмап. Как это все программно реализовать никто не в курсе?
1.5K
17 февраля 2004 года
AndySPb
58 / / 11.04.2003
Да, и еще в догонку. На самом деле проблема возникает в строчке
Image1->Picture->SaveToFile(name);
Мне надо довольно много таких картинок сохранять, но довольно часто возникает EOutOfResourse. Когда я уменьшаю разрешение картинки, они возникают реже. Я вот и думаю, может в jpg сохранять, он гораздо меньше места жрет. Но работать там надо с битмэпом
2.0K
18 февраля 2004 года
Fazil6
126 / / 17.12.2003
Цитата:
Originally posted by AndySPb
Да, и еще в догонку. На самом деле проблема возникает в строчке
Image1->Picture->SaveToFile(name);
Мне надо довольно много таких картинок сохранять, но довольно часто возникает EOutOfResourse. Когда я уменьшаю разрешение картинки, они возникают реже. Я вот и думаю, может в jpg сохранять, он гораздо меньше места жрет. Но работать там надо с битмэпом



воспользуйся классом TJPEGImage

1.5K
20 февраля 2004 года
AndySPb
58 / / 11.04.2003
Цитата:
Originally posted by Fazil6


воспользуйся классом TJPEGImage



Попробовал, все равно не понимаю как туда загнать этот битмэп из имиджа

2.0K
20 февраля 2004 года
Fazil6
126 / / 17.12.2003
Цитата:
Originally posted by AndySPb


Попробовал, все равно не понимаю как туда загнать этот битмэп из имиджа



чего там сложного?

TJPEGImage *jpg_pic = new TJPEGImage();

jpg_pic->Assign(Image1->Picture->Bitmap);
jpg_pic->SaveToFile("c:\\name.jpg");

1.5K
20 февраля 2004 года
AndySPb
58 / / 11.04.2003
Цитата:
Originally posted by Fazil6


чего там сложного?

TJPEGImage *jpg_pic = new TJPEGImage();

jpg_pic->Assign(Image1->Picture->Bitmap);
jpg_pic->SaveToFile("c:\\name.jpg");



Я в общем то так и написал, но в строке
jpg_pic->Assign(Image1->Picture->Bitmap);
постоянно EAccessViolation вылетает

2.0K
20 февраля 2004 года
Fazil6
126 / / 17.12.2003
Цитата:
Originally posted by AndySPb


Я в общем то так и написал, но в строке
jpg_pic->Assign(Image1->Picture->Bitmap);
постоянно EAccessViolation вылетает



Вот кусок моей программы, работает уже несколько лет.
Функция переконвертирует имеющийся бмпшник в джпег
bool TVideoForm::BmpToJpeg(AnsiString name)
{

TJPEGImage *jpgIm = new TJPEGImage;
try
{
Image4->Picture->Bitmap->LoadFromFile(name);
jpgIm->Assign(Image4->Picture->Bitmap);

jpgIm->CompressionQuality=70;

jpgIm->SaveToFile(name+".jpg");
Image4->Picture->Bitmap->FreeImage() ;

}
catch(...)
{
delete jpgIm;
return 0;
}
delete jpgIm;
DeleteFile(name);
return 1;


}

1.5K
20 февраля 2004 года
AndySPb
58 / / 11.04.2003
Цитата:
Originally posted by Fazil6


Вот кусок моей программы, работает уже несколько лет.
Функция переконвертирует имеющийся бмпшник в джпег
bool TVideoForm::BmpToJpeg(AnsiString name)
{

TJPEGImage *jpgIm = new TJPEGImage;
try
{
Image4->Picture->Bitmap->LoadFromFile(name);
jpgIm->Assign(Image4->Picture->Bitmap);

jpgIm->CompressionQuality=70;

jpgIm->SaveToFile(name+".jpg");
Image4->Picture->Bitmap->FreeImage() ;

}
catch(...)
{
delete jpgIm;
return 0;
}
delete jpgIm;
DeleteFile(name);
return 1;


}



Так пробую точно так же, но все равно этот EAccessViolation , Единствинное различие в строке
jpgIm->CompressionQuality=70;
но так он до нее и не доходит даже

1.5K
24 февраля 2004 года
AndySPb
58 / / 11.04.2003
А как назад из jpg в bmp?
2.0K
25 февраля 2004 года
Fazil6
126 / / 17.12.2003
Цитата:
Originally posted by AndySPb
А как назад из jpg в bmp?



Image4->Picture->Bitmap->LoadFromFile(name);

1.5K
26 февраля 2004 года
AndySPb
58 / / 11.04.2003
Спасибо за помощь. А может ты в курсе еще что такое JPEG error #60? Что означает это сообщение об ошибке (из исходников модуля
JPEG я так и не
понял, какая именно ошибка имеет 60-ой номер (файл
jerror.h))?
468
09 марта 2004 года
Jackal
48 / / 20.09.2000
Цитата:
Originally posted by AndySPb
Спасибо за помощь. А может ты в курсе еще что такое JPEG error #60? Что означает это сообщение об ошибке (из исходников модуля
JPEG я так и не
понял, какая именно ошибка имеет 60-ой номер (файл
jerror.h))?


Читай ХЕЛП по БИЛДЕРУ там есть практически все ответы, на часто задаваемые вопросы... :)

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог