Hola yo soy recien estrenado en el Foro y hé recibido ayuda de los que saben, en mi modesta opinión puedes resolver de la siguiente forma:
Yo utilizo un Combo pero debe funcionar igual con un List.
Código Delphi
[-]
var can,zz: integer; a,b:string;
begin
can:=ComboBox1.Items.Count;
b:=0;
for zz:=0 to can do
begin
a:=b;
ComboBox1.ItemIndex:=zz;
Label2.Caption:=ComboBox1.Items[ComboBox1.ItemIndex];
b:=Label2.Caption;
luego conviertes los string de cada variable a numero y los sumas
dandote la suma de todos los items.
A mí me resultó espero que te sirva.