Hola,
Necesito manejar una excepcion al tratar de conectarme a una Base de datos:
Código:
try
DataModule1.PixelSQLbase.Connected := True;
Result := True;
except
Conectar := False;
On EDBEngineError do
Begin
DataModule1.PixelSQLbase.Connected := False;
ShowMessage('ERROR 1:');
End;
On EDatabaseError do ShowMessage('ERROR');
End;
end;
Pero este codigo aun me
"
EXPLOTA"
y cuando vuelvo a ejecutar el proyecto si me tira el mensaje que puse.
He inteentado encontrar un Haddle que pueda funcionar pero no he tenido suerte.