Problem mit TListItem

[Mystic]

i := lvwQueue.Items.Count; Da das Item-Array nullbasiert ist hat das letzte Item einen Index von Count-1. Daher machst du aus dieser Zeile das:

i := lvwQueue.Items.Count - 1; Denn ansonsten existiert dein Item nicht und so kommt es natürlich beim Zugriff auf ImageIndex zu einem Fehler.