Excepciones

[adpa]

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