Var

  aBitmap: TBitmap;

begin

  aBitmap := TBitmap.Create;

  try

    aBitmap.LoadFromFile('00.bmp');

    ImageList1.AddMasked(aBitmap, aBitmap.TransparentColor);

  finally

    aBitmap.Free;

  end;

end;