Privilégios, no sistema

[jedinaru]

Ola galera, eu estou desenvolvendo um simples programa no delphi e gostaria de colocar alguns privilégio ao admistrador.

Tabela

Usuario:

cod, usuario, senha, tipo --A-- administrador --B-- Usuario

Quando o usuario digitar o "Usuario" e "senha", se for do tipo --B-- usuario, o formulario "Usuario" onde adiciona e altera os usuario os botões ficrão inativo, e para o administrador tem permissão para tudo,

formularios

login

Principal

Usuario

Espero que tenham entendido

Valeu!!!!!!!!!!

[Rodrigo Flores]

Ola galera, eu estou desenvolvendo um simples programa no delphi e gostaria de colocar alguns privilégio ao admistrador.

Tabela

Usuario:

cod, usuario, senha, tipo --A-- administrador --B-- Usuario

Quando o usuario digitar o "Usuario" e "senha", se for do tipo --B-- usuario, o formulario "Usuario" onde adiciona e altera os usuario os botões ficrão inativo, e para o administrador tem permissão para tudo,

formularios

login

Principal

Usuario

Espero que tenham entendido

Valeu!!!!!!!!!!

Boa tarde, jedinaru.

Tu podes tentar assim:

No evento OnShow do formulário

MenuQueTuQuerDesabilitar.Enabled := NomeDaTabela.FieldByName('TIPO').AsString = A;

Faça isso para todos os botões/menus que tu quiser testar.

[]'s

Editado Outubro 21, 2008 por Rodrigo Flores

[Micheus]

jedinaru, se vier a usar esta abordagem para menus, dê uma olhada neste post que, apesar de não ser exatamente da forma que você pretende implementar, pode ser aproveitado o conceito sobre a aplicação nos menus.

Abraços