Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works

Random project

JPEG-XL-encoder-decoder-in-pure-Pascal-for-Free-Pascal-Delphi-Lazarus

JPEG XL encoder/decoder in pure Pascal for Free Pascal/Delphi/Lazarus

View on GitHub

Anyone may press Interesting, signed in or not. It helps others find this project.

Member rating

No ratings yet.

Sign in to rate this project.

README

Usage

pascal
uses JxlImageX;

Image1.Picture.LoadFromFile('test.jxl');

Saving to JPEG XL

pascal
var jxl: TJxlImage;
    Bmp: TBitmap;
begin
  Bmp := TBitmap.Create;
  Bmp.LoadFromFile('test.bmp');

  jxl := TJxlImage.Create;
  jxl.Assign(Bmp);
  Bmp.Free;

  jxl.SaveToFile('out.jxl');
  jxl.free;