[mRoman]

Hola buenos dias.

Trabajo con DELPHI6 y FIREBIRD 2.0, Win10

Saludos amigos. Nuevamente apoyándome en todos ustedes y sus conocimientos.

Tengo un formulario LOGIN que tiene 2 botones "INICIAR SESION" y otro "CANCELAR" y tengo un DATAMODULE con un IBDatabase y un IBTransaction.

El usuario al dar click sobre el botón Cancelar, pues obvio no se conecta y sale un mensaje de error de que el usuario y contraseña no están en la base de datos...., como puedo cambiar este mensaje que me manda por default y mostrar otro.

Aqui el código en el DataModule:

Código Delphi [-]
procedure TbdMMS.dbMMSLogin(Database: TIBDatabase; LoginParams: TStrings);
begin
     try
           frmConexion:=TFrmConexion.Create(Self);

           if frmConexion.ShowModal = mrOk then
              begin
                  LoginParams.Values['user_name'] := frmConexion.edNombreUsu.Text;
                  LoginParams.Values['password']  := frmConexion.edContrasenia.Text;
                  dbMMS.DatabaseName:=frmConexion.cServer+':C:\MMS\BD\BD-MMS.FDB';
              end;
     finally
          frmConexion.Free;
     end;

end;

Como interceptar ese mensaje y mostrar otro....??

Gracias por su tiempo.