Cita:
Empezado por Neftali
En ejecución deberías poder capturar ese error sin problemas, si redefines el método Create del formulario.
Código Delphi [-]
private
constructor Create(AOwner: TComponent); override;
...
No lo he probado, pero debería funcionar.
|
No estoy tan seguro. Ten en cuenta que lo primero que hay que hacer en el constructor es llamar al constructor heredado para reservar la memoria. Esto hace (si no recuerdo mal, y en este caso) que también se creen los componentes y se establezcan los valores de sus propiedades.
Lo que sí podría intentarse es capturar la excepción. Algo así como:
Código Delphi
[-]CONSTRUCTOR TForm.Create (AOwner: TComponent);
BEGIN
TRY
INHERITED Create (AOwner)
EXCEPT
ON Error: Exception DO
BEGIN
END
END
END;
Lo ideal aquí sería usar una clase de excepción del ADO Connection para discriminar.