TIOMultiParams.Params

Declaration

property Params[idx: integer]: TIOParams;

Description

Provides access to the TIOParams object for the image idx to modify image parameters (e.g. bits per sample, compression, etc).

// Change the DPI of all images
for i := 0 to ImageEnMView1.MIO.ParamsCount - 1 do
begin
  ImageEnMView1.MIO.Params[i].DpiX := 72;
  ImageEnMView1.MIO.Params[i].DpiY := 72;
end;

// Change the compression method for a TIFF file
// Note: This is an example. A better method is to use DuplicateCompressionInfo()
MBitmap := TIEMultiBitmap.Create();
MBitmap.ParamsEnabled := True;
MBitmap.LoadFromFile( 'C:\MyImage.tiff' );
for i := 0 to MBitmap.Count - 1 do
  MBitmap.Params[i].TIFF_Compression := ioTIFF_G4FAX;
MBitmap.SaveToFile( 'C:\OutImage.tiff' );
MBitmap.Free;

// Convert a TIFF to PDF with "US Letter" paper size
mbmp := TIEMultiBitmap.Create();
mbmp.ParamsEnabled := True;
mbmp.LoadFromFile('D:\Input.tif');
for i := 0 to mbmp.Count-1 do
begin
  mbmp.Params[i].PDF_PaperSize   := iepLetter;
  mbmp.Params[i].PDF_Compression := ioPDF_JPEG;      // or ioPDF_G4FAX for monochrome images
  mbmp.Params[i].JPEG_Quality    := 90;
end;
IEGlobalSettings().PDFEngine := ieenNative;          // For compression support
mbmp.SaveToFile('D:\Output.pdf');
mbmp.Free;

// Create an animated GIF file from ten source images
mbmp := TIEMultiBitmap.Create();
for i := 0 to 9 do
begin
  mbmp.AppendImage( format( 'D:\Source\Frame %d.bmp', [i] ));
  mbmp.Params[i].GIF_DelayTime := 10; // Display each frame for 1/10th of a second
end;
mbmp.SaveToFile( 'D:\animated.gif' );
mbmp.Free;

TIOMultiParams.Params