Hola rufo.
Lo que te sugiere Casimiro creo, es quitarlos para operar con ellos. No te altera para nada la muestra del resultado.
Supongamos (no lo especificas), que tu separador de miles es la coma y de decimales el punto.
Entonces sería:
Código Delphi
[-]
procedure TForm1.Button9Click(Sender: TObject);
var
aux: string;
suma: Extended;
v_conta: Integer;
i: Integer;
begin
DecimalSeparator:= '.';
ThousandSeparator:= ',';
suma := 0;
for i := 0 to listbox14.Items.Count - 1 do
begin
aux:= ListBox14.Items[i];
Delete(aux,Pos(',',aux),1);
suma := suma + strToFloat(aux);
Inc(v_conta);
end;
Label28.Caption := floatToStrF(suma,ffNumber,20,2);
end;
Fijate que la operación de borrado se hace sobre la variable auxiliar 'aux' y no afecta para nada el formato original.
Saludos.