ImageEn, unit iexBitmaps

TIOParams.CUR_ImageIndex

TIOParams.CUR_ImageIndex


Declaration

property CUR_ImageIndex: Integer;


Description

The index (zero-based) of the current image/cursor of the current cursor file (CUR files can contain multiple images). Use ImageCount to return the number of images the file contains.


Examples

// Load the second cursor inside 'alfa.cur'
ImageEnView1.IO.Params.CUR_ImageIndex := 1;
ImageEnView1.IO.LoadFromFile('C:\alfa.cur');

// Load a Cursor file and save each of its pages as a BMP File
ImageEnView1.IO.LoadFromFile('C:\input.cur');  // Load first image to get value for Params.ImageCount
for I := 0 to ImageEnView1.IO.Params.ImageCount - 1 do
begin
  ImageEnView1.IO.Params.CUR_ImageCount := I;
  ImageEnView1.IO.LoadFromFile('C:\input.cur');
  ImageEnView1.IO.SaveToFile( format( 'D:\image_%d.bmp', [ I + 1 ]);
end;