Fórum Controle de Acesso em Delphi? #186476

Deixa te explicar como fiz:

No cadastro do usuário, abro um outro form contendo todos os módulos do programa (cadastro A, cadastro B.... Venda... Rela...)

Após selecionar um módulo deste eu abro outra aba onde ele configura a permissão p/ operação, assim posso configurar que o usuário A pode acessar o cadastroA e apenas alterar dados + não inserir nem deletar...

Isto tudo fica armazenado em tabelas assim qdo o usuário loga no sistema, eu carrego isto p/ uma estrutura de dados(array p.ex) e donte consunto informações.

Assim, qdo o usuário tenta acessar o CadastroA, eu verifico se ele tem permissão de acesso, se tiver eu permito ele entrar... dae eu verifico q q ele pode fazer, habilitando os botões ou não.

entendeu?

Olha, primeiro vc pode criar uma tabela que armaze o Nome do Usuario junto com as permissoes tipo:

Nome | Excluir | Novo | Alterar
Joao | False | True | False
MAria | True | False| True

Quando entrar no sistema vc pode criar VAR e habilitar ou desabilitar os botõe

Tipo uma Rotina PUBLIC que quando entrar nos forms.Acho que pode te ajudar

Saudações, Verifique o componente USERCONTROL que vc facilmente achara na internet, o mesmo funciona muito bem, Verifique......