Функция конвертирует файл формата jpeg в bmp.
На входе полное имя файла, возвращает true
в случае успешной конвертации.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | bool JPEG2BMP(AnsiString FileName) { TJPEGImage *jpg = new TJPEGImage; Graphics::TBitmap *bmp = new Graphics::TBitmap; bool ok = true; // Маркер хорошего поведения. try { jpg->CompressionQuality = 100; // Качество сжатия. jpg->LoadFromFile(FileName); // Загружаем jpeg. try { bmp->Assign(jpg); // Переносим данные в bmp. bmp->SaveToFile(ChangeFileExt(FileName, ".bmp")); } catch (...) { ok = false; } } catch (...) { ok = false; } jpg->Free(); bmp->Free(); return ok; } |
Для информирования пользователя об ошибке можно добавить перед return
что-то из ряда:
1 2 | if (!ok) ShowMessage("Конвертирование не увенчалось успехом"); |