Ver Mensaje Individual
  #7  
Antiguo 12-03-2005
alfredosg19 alfredosg19 is offline
Miembro
 
Registrado: ene 2005
Ubicación: Barcelona
Posts: 91
Reputación: 20
alfredosg19 Va por buen camino
Me falta un dato.

Hola a todos, seguro que lo que me falta es una tonteria pero no puedo hacer la comparación, lo he intentado de todas las maneras pero no puedo, hasta el and va bien seguro. Después hice lo mismo para la contraseña que para lo del usuario y resultó pero me valida a cualquier usuario con cualquier contraseña. Les pido el último empujón. MUCHAS GRACIAS.
Código:
procedure TFrmUsuari.BitBtn1Click(Sender: TObject);
 begin
 if (ADOtable1.Locate('usuari', meUsuari.Text, []) and (ADotable1.????? = meCodi.Text))) then
 begin
    ShowMessage('Aqui debes hacer lo que tu quieras.');
 end else
    ShowMessage('Mi#@}, este usuario no esta aqui, revise');
 end;
__________________
"La perseverancia es el camino del éxito"
Responder Con Cita