Ayuda con diseño de Tablas de Permisos Para usuarios

[[José Luis Garcí]]

Hola microbiano, te pongo como lo solucione yo, para la tabla usuarios, encripto la clave de acceso, pero no el ususario y el nivel de usuario (parte fundamental de mi sistema).

Cuando carga el usuario en el acceso, carga una variable el nivel de usuario, luego en el action list, tengo una funcion que carga los form comprobando si tienes nivel de usuario suficiente, en tu caso si lo quieres puedes usarlo, directamente , en las cationes o directamente en los onclick de los botones y la propiedad tag, basta con un simple

Código Delphi [-]
if varINivelUsuario >=Button.Tag then
....(codigo a evaluar)
end else Showmmesage('No tiene el nivel necesario, para ejecutar este apartado');

Te comento que en el tag uso niveles del 0 al 9
donde:
0 es invitado, (no necesita clave)
1-5 (Básico)
6-7 (para usuario de alto permiso)
8 (supervisor)
9 (pide nuevamente la clave del usuario, normalmente lo uso en apartador que necesitan un nivel de usuari superior a 6)

Espero te sea util.