Gracias por la ayuda, al ejecutar el siguiente código
Código Delphi
[-]
If Pos ('@Puntos',XPuntos)>0 Then
Begin
Delete (XPuntos,1,Pos(' ',XPuntos));
ListView1.Items[1].SubItems[2] := XPuntos;
End;
@Puntos es el inicio de la cadena que contiene los puntos
XPuntos contiene la lista completa de puntos, Ejemplo:
@Puntos 15
@Puntos 42
@Puntos 53
...
Al ejecutar me aparece un Access Violation, aun no se muy bien el motivo, seguiré buscando donde esta el problema.