J2KCompressionRatio example for Delphi

   //shows saving J2K using CompressionRatio
   // compress a JPEG2000 file using 100:1 comp ratio
   LEADImage1.J2KCompressionControl:= J2K_COMPRESSION_RATIO;
   LEADImage1.J2KCompressionRatio:= 100;
   LEADImage1.Save ('c:\temp\100_to_1.j2k', FILE_J2K, 0, 0, SAVE_OVERWRITE);