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;
mbmp.Params[i].JPEG_Quality := 90;
end;
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;