Insert (ImageList Control) example for Delphi

{load an image}
LEADImage1.Load('v:\images\eagle.cmp', 0, 0, 1);
{insert it into the ImageList control}
LEADImgList1.Insert (LEADImage1.Bitmap, 'testing', 1);
LEADImgList1.EnsureVisible (LEADImgList1.Count - 1);