151просмотров
6 января 2026 г.
📷 ФотоScore: 166
Сохранить битмап в формате png, jpg, gif, bmp Каким бы образом мы не получили изображение, внутри программы работаем только с битмап. Но бывает нужно сохранять результат. И как-то глупо сохранять его всегда в bmp. Альтернативное и простое решение, без использования TGraphicClass - через TWICImage. Работают встроенные конверторы Windows. Если для битмапа указано: PixelFormat = pf32bit и AlphaFormat <> afIgnored то в PNG будет экспортироваться сразу с прозрачностью procedure SaveBitmapAs(Bitmap: TBitmap; const FileName: string); var WIC: TWICImage; S: string; begin WIC := TWICImage.Create; try WIC.Assign(Bitmap); S := ExtractFileExt(FileName).ToLower; if S='.png' then WIC.ImageFormat := wifPng else if (S='.jpg') or (S='.jpeg') then WIC.ImageFormat := wifJpeg else if S='.gif' then WIC.ImageFormat := wifGif else WIC.ImageFormat := wifBmp; WIC.SaveToFile(FileName); finally WIC.Free; end; end;
151
просмотров
1006
символов
Нет
эмодзи
Да
медиа

Другие посты @ip76ru

Все посты канала →