[[coso]]

Deberias comprobarlo en el momento en que necesitas un numero. La manera correcta de comprobarlo es usando excepciones (el usuario tb puede que haya puesto una letra, una O por un 0, cosas asi...)
La manera correcta para coger estos errores es usando :

Código Delphi [-]
try
     a_sumar := strtofloat(Edit1.Text);
  // Lo que se va a probar si provoca error o no
except
  // Lo que quieras que pase si da un error...un mensaje, un valor por   
  //defecto...si no pasa ningun error, el trozo este no se ejecutara.
end;

aqui un ejemplo: lo puedes colocar en un boton 'Suma'

Código Delphi [-]
var
  i : integer;
  a_sumar : double;
  resultado : double;
begin
  resultado := 0;
  for i := 0 to 324 do 
  begin
    try
     a_sumar := strtofloat((FindComponent('Edit'+inttostr(i)) as TEdit).Text);
     except  // Si hay error....
         a_sumar := 0;
         ShowMessage('Error en el Editbox nº' + inttostr(i));
     end;
     resultado := resultado + a_sumar;
  end;
  ShowMessage(FormatFloat('0.00',Resultado));
end;

venga, a ver si te sirve