is not a valid integer value

[ecfisa]

Hola djhairoflow, bienvenido a Club Delphi

Como es costumbre con los iniciados, te invito a que leas nuestra guía de estilo.

También te sugiero que cuando incluyas código en tus mensajes utilices TAG's como lo explica esta imágen:


Al hacer mas legible tu código, te ayudará a conseguir más respuestas ya que muchos no se tomarán la molestia de leerlo si está confuso.

Saludos y gracias por tu colaboración

[[ElKurgan]]

Yo te aconsejaría hacer algo así:

Código Delphi [-]
 
if(edit1.Text='') or (edit2.Text ='') or (edit3.Text='') or (edit4.Text ='') 
or (edit5.Text ='') or (edit6.Text ='') or (edit7.Text ='') or (edit8.Text ='') 
or (edit9.Text ='') or (edit10.Text='') or (edit11.Text ='') or (edit12.Text='') 
or (edit13.Text='') or (edit14.Text ='') or (edit15.Text ='') then
begin
  showmessage ('Los datos no están completos o son incorrectos');
  exit;
end
else
begin
  ...

Me explico: Tras el "else begin" vienen las asignaciones a los números, y terminan con un end, que se supone que es el del "else". Ahora bien, inmediatamente después te pones a hacer cálculos y ahí si es posible que algún "edit" no tenga un número válido.

Otra opción es usar "StrToIntDef(Edit1.Text, 0)", ya que sesta función devuelve el valor indicado si no puede transformar la cadena a número. Eso para todos los campos de texto

Saludos

[Ferrari]

Coincido con [ElKurgan] ya que sino sacas el proceso con el

Código Delphi [-]
exit

estas dejando correr el proceso sin importarte que falte algún numero por capturar...puedes validar también que te indique cual edit te falta por capturar y enviar el foco para que sea capturado.