1 reply to this topic

[ariano]

Para poder entrar a una aplicación que hice en delphi con postgresss, que hice, lo hice con Login y Password pero quisiera que cuando hiciera el hasta el tercer intento me enviara un mensaje de que hubo un logeo que no se pudo realizar a determinada hora.
Me podrian dar alguna idea por favor.
Gracias

[Delphius]

Hola Ariano,
Va a ser falta que nos des un poco más de luz ¿no crees? Porque no se termina de entender, ¿Cómo es que llevas el login? ¿Que debemos entender por enviar un mensaje? ¿Que se te envie un e-mail a tu cuenta? ¿Que aparezca un letrero en pantalla? ¿Un SMS? ¿Un mensaje directo a tu cuenta de Twitter? ¿Cómo llevas tu sistema?
¿Me explico? 

Porque así como lo estás exponiendo, con tan pocos detalles, la solución más abstracta y certera que llego a tu caso consiste en esto:

delphi

CheckIn := false;
intentos = 1;
repeat
  CheckIn := CompruebaIdentidad(NombreUsuario, Contrasenna);
  inc(intentos);
until (intentos = 4) OR CheckIn;
if NOT CheckIn
   then ShowMessage('Datos incorrectos. Ha agotado sus tres intentos');

Siendo CompruebaIdentidad algún método que realice tal comprobación y regrese un valor booleano según el caso.

Por favor explícate para poder asesorarte.

Saludos,