Попробуй добавить BeginUpdate, EndUpdate.
ListView1.ClearItems;
ListView1.BeginUpdate;
with ListView1.Items.Add do
....
Tag := 413;
end;
ListView1.EndUpdate;
Если не поможет, попробуй без Bitmap.LoadFromFile. У меня похожий код работает и на XE7 и на XE8. Подобную ошибку получал, когда картинки не успевали подгружаться в потоке (правда я их подгружал не с диска, а из интернета).