Delphi - controlar este Error

Hola a todos

tengo un problema, eh estado buscando pero no encuentro una buena solicion.

quiero conectar a traves de ADO con MySQL.

Conexion:='Driver={MySQL ODBC 3.51 Driver};'+
'Server=' + LblServer.Text + ';' +
'DATABASE=' + LblSchema.Text + ';' +
'UID=' + lbluser.Text + ';' +
'PWD=' + LblPassword.Text + ';' +
'OPTION=3';

try
ADOConnection1.ConnectionString:=conexion;
ADOConnection1.Open;
except
//on EOleException do <---- eso no resulta
Application.MessageBox ('Password Incorrecta', 'Error', MB_ICONERROR);
LblPassword.setfocus;
end;

La idea de esto es que si un usuario ingresa mal el nombre de usuario o la
password que me muestre un mensaje de error y no q me aparezca un mensaje feo
en la pantalla.

Espero q me entiendan la idea.

Espero su ayuda.

Gracias...

Con este código (He usado Access y una contraseña no válida para la BD):

try
ADOConnection1.Connected:=true;
except
On EOLEException do ShowMessage ('Contraseña no válida');
end;

a mi si me funciona. Lo que debes comprobar es que:

1) Has añadido la cláusula ComObj al uses del Form.
2) Por defecto, el IDE de Delphi recoge los errores antes que las excepciones definidas por el usuario. Si te aparece el mensaje de "EOLEException...", dale a Run de nuevo para ver tu mensaje de error personalizado. Luego, cuando la aplciación corra sola, saldrá solo el que pusiste.

Suerte.