Error (ImageList Control) example for Delphi

LEADImgList1.EnableMethodErrors:= true;

try
   LEADImgList1.LoadFromFile ('d:\temp\img\test1.tif', 0, 0, -1);
except    

ShowMessage('Error Code :' + IntToStr(LEADImgList1.Error) +#10+    LEADImgList1.ErrorMsg );
end;