Hola
Me parece muy bien, ahora una guia mas:
Primero la consulta seria asi:
Código Delphi
[-]
QryUsuario.SQL.Text:='select * from usuario where Nombre = :P1 and Clave = :P2 and Rol= :P3';
QryUsuario.Params[0].AsString:=EdtNombre.Text;
QryUsuario.Params[1].AsString:=EdtClave.Text;
Los parametros empezarian desde 0, lo ves?
Tenemos tres parametros, verdad?, pero solo tengo dos referencias a los mismos, verdad?.
De donde saco la tercera referencia, osea el parámetro ROL, donde esta?.
Saludos