[jhonny]

Empezado por Avellas

Gracias.. por la colaboración.

Pero resulta que la idea es que al checkear el campo inmediatamente totalice, no al Final

Bueno, pues puedes adaptar el procedimiento que te mostre en el evento correspondiente, por ejemplo en el OnChange, asi:

Código Delphi [-]
procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem;
  Change: TItemChange);
var
  i :Integer;
  Acumulado :Extended;
begin
  Acumulado := 0;
  for i := 0 to ListView1.Items.Count -1 do
  begin
    if ListView1.Items[i].Checked then
    begin
      Acumulado :=  Acumulado + StrToFloat(ListView1.Items[i].Caption);
    end;
  end;
  Label1.Caption := FloatToStr((Acumulado));
end;

Ese evento se ejecutara varias veces pero visualmente parece lo que necesitamos, si encuentras uno que se ejecute menos veces, pues sería interesante que nos lo mostraras.