Hola todo@s.
En principio perdón pero no me di cuenta de las reglas de estilo.
Capturo la excepción en la función que se produce. Más o menos es esto
WHILE () DO
BEGIN
....
funcion que puede producir excepción
....
END
Funcion que puede producir excepción
BEGIN
try
...
except
on E: EConvertError do
raise eCamposNoValido.Create('');
end;
END;
Entonces si se produce una excepción al volver al bucle se sale.
Gracias
|