Debes comprobar cuantos subItems tiene este Item:
Código Delphi
[-]for i:= 0 to listview.items.count -1 do
begin
if listview.items[i].SubItems.Count < 1 then
listview.items[i].subitem.add('0');
end;
Esto sirve para tu caso concreto, en otras ocasiones tendras que buscar otras maneras.
Cuando añades un Item nuevo, este no trae los SubItems añadidos por defecto, sino que tienen que ser creados manualmente.
Saludos