Fórum Cadastro de usuários com Perfil de Acesso #405424
22/07/2011
0
Baixei um exemplo aqui que adiciona os itens do MainMenu num Treeview. Vc cadastra um usuário e no treeview, com dois cliques vc tira ou libera o acesso no login do usuário.
Tem um livro que cria duas tabelas: uma com perfil e a outra os usuários com perfil. O controle é feito via programação, ou seja, caso aumente uma opção do menu, tem que colocar na mão.
Qual dessas duas opções é mais vantajosa? Usar Treeview ou fazer na mão? O Treeview também usa tabela de perfil e usuário.
Frederico Brigatte***
Curtir tópico
+ 0Posts
06/08/2011
Frederico Brigatte***
Baixei um exemplo aqui que adiciona os itens do MainMenu num Treeview. Vc cadastra um usuário e no treeview, com dois cliques vc tira ou libera o acesso no login do usuário.
Tem um livro que cria duas tabelas: uma com perfil e a outra os usuários com perfil. O controle é feito via programação, ou seja, caso aumente uma opção do menu, tem que colocar na mão.
Qual dessas duas opções é mais vantajosa? Usar Treeview ou fazer na mão? O Treeview também usa tabela de perfil e usuário.
Nossa, Ninguém????
Gostei + 0
08/08/2011
Wilson Junior
Espero ter colaborado.
Gostei + 0
09/08/2011
Frederico Brigatte***
Espero ter colaborado.
Gostei + 0
09/08/2011
Frederico Brigatte***
Espero ter colaborado.
Gostei + 0
10/08/2011
Wilson Junior
Espero ter colaborado.
Gostei + 0
10/08/2011
Frederico Brigatte***
Espero ter colaborado.
Como fazer isso, não sei.
Gostei + 0
10/08/2011
Frederico Brigatte***
Espero ter colaborado.
Como fazer isso, não sei.
Como também gravar no banco os itens escolhidos?
Gostei + 0
10/08/2011
Wilson Junior
http://www.planetadelphi.com.br/download/4757/arquivo/menu-dinamico-em-um-treeview
http://www.activedelphi.com.br/forum/viewtopic.php?t=63923&sid=1686e78d1ef990587d22cd75d933492e
Espero ter colaborado.
Gostei + 0
10/08/2011
Frederico Brigatte***
http://www.planetadelphi.com.br/download/4757/arquivo/menu-dinamico-em-um-treeview
http://www.activedelphi.com.br/forum/viewtopic.php?t=63923&sid=1686e78d1ef990587d22cd75d933492e
Espero ter colaborado.
Então, o do planetadelphi eu tenho, só não entendi como gravar no banco. Estou usando access. Queria saber uma forma mais fácil.
O trecho que grava é esse:
for i := 0 to tv.Items.Count - 1 do begin
if i > 0 then begin
if tv.Items[i].HasChildren then
rots := rots + '|'
else
rots := rots + '||';
rots := rots + tv.Items[i].Text
end
end;
Ele grava assim na tabela que é um campo memo:
|Cadastros||Clientes||Fornecedores||Usuário|Pesquisa||Geral|Relatórios||Geral|Manutenção||Configuração||Cópia de Segurança|Sistema||Trocar Usuário||Alterar Senha||Sobre||Sair
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)