A jpeg konvertálása bmp-be és vissza a delphi, melfis blogba

Ma írunk egy programot a JPEG fájlok BMP-re történő átalakítására és fordítva. Először nézzük meg, mi a JPEG. A JPEG (helyesen kiáltott "jeep" közös fotográfiai szakértői csoport, a szervezet-fejlesztő neve) az egyik népszerű grafikai formátum, amely képfájlok és hasonló képek tárolására szolgál. A JPEG-adatokat tartalmazó fájlok általában .jpeg kiterjesztésekkel rendelkeznek. JFIF. jpg. JPG vagy .JPE. Azonban a .jpg a legnépszerűbb kiterjesztés minden platformon. A MIME típus a kép / jpeg. A JPEG algoritmus a legmegfelelőbb a fényképek és képek tömörítésére, amelyek reális képeket tartalmaznak, sima fényviszonyok és színes átmenetek. A legelterjedtebb JPEG a digitális fotózás, valamint az interneten keresztül történő képek tárolása és továbbítása volt.
És a BMP. BMP (Bitmap Picture) formátumú bitképek tárolására. A BMP formátummal nagyszámú program működik, hiszen a támogatás a Windows és OS / 2 operációs rendszerekbe integrálódik. A BMP fájlok tartalmazhatnak .bmp kiterjesztéseket. dib és .rle. Ezenkívül a formátum adatait a bináris RES forrásfájlok és PE ​​fájlok tartalmazzák. Szín mélysége ebben a formátumban lehet 1, 2, 4, 8, 16, 24, 32, 48 bit per pixel, a maximális képméret 65535 × 65535 képpont.
Hozzon létre egy új űrlap-alkalmazásprojektet, és adja hozzá a következő összetevőket az űrlapunkhoz:

OpenDialog
Ezzel kiválasztjuk a konvertálandó fájlt.

SaveDialog
Ennek megfelelően mentse el az átalakított fájlt.

RadioGroup
Az Elemek tulajdonságban adja meg a "JPEG to BMP" és a "BMP to JPEG" elemeket. Semmi többre nincs szükség rá, kivéve, hogy jelezze az IF üzemeltető számára, hogy milyen eljárást kell végrehajtani.

LabeledEdit.
Két darab. Az egyik a EditLabel-> Caption tulajdonságban írja a "Source file" -t, és a másik "Final file" -t.

A LabeledEdit1 esetében írja be a következő kódot az OnClick eseménykezelőben:

Az OnClick Labeled2 esetében hívja a mentési párbeszédet:

És adj hozzá egy gombot. Ha erre kattintasz, akkor a konverzió megtörténik. De később a kezelőről. Itt van a forma, amit kaptam:

A jpeg konvertálása bmp-be és vissza a delphi, melfis blogba

Csatlakoztassa a modul Jpeg felhasználási modulját.

És adjon hozzá két eljárást:

Most írd meg a két eljárást kódunkban:

Hozzon létre egy OnClick eseménykezelőt a mi gombunkra Button1:

Futtathatja a programot, és megpróbálhatja konvertálni a fájlokat.

Partnerhivatkozások

Kapcsolódó cikkek