Controle de Acesso de Usuarios
23/03/2003
0
To com um problema...
Gostaria de saber como posso montar um controle de usuarios para meu sistema, como onde tal usuario pode entrar se ele pode alterar, gravar, somente pesquisar, emfim essas coisas, alguem pode me dar alguma idéia de como montar isso...
[]´ s junior
Anonymous
Posts
23/03/2003
Anonymous
criei duas tabelas uma contendo o usuario (Nome e Senha) que sera a Mestre e outra contendo todo o menu do sistema que sera a Detalhe depois um form com componentes dbcheckbox ligado em cada campo da tabela Detalhe e no form principal no evento on show coloquei um comando para verificar se a tabela detalhe esta recebendo FALSE para negar o acesso do usuario. isso tudo ta bem resumido ´e apenas ter uma ideia.
Se alguem que entende bem do assunto puder esclarecer melhor essa nossa duvida ficaremos muito grato
[]s
23/03/2003
Anonymous
Ele funciona com o IB e IBX (entre outras formas de acesso, IBO, BDE.. etc...) e cria 3 tabelas no Banco IB e FAZ TUDO sozinho.... Tem ate uma tela pra vc poder configurar o q cada usuario pode ou montar Grupos com permissões proprias... Ai é so atribuir o usuario ao Grupo q ele herda as permissoes... Mole ... Mole.... Ficou muito bom....
So tem um problema q me impede de usar... Eu tenho uma proteção no Sistema q é chamada no inicio do Sistema (em em varias outras partes) e o componente cria Invariavelmente o form de login quando a aplicacao é iniciada e ta dando um pau ai.... Mas se nao tivesse isto ele seria uma verdadeira Mão na roda....
Haaaa... tem fontes .... Nem acreditou né ??????????????????
De graça, com qualidade e tem fontes ?????????? So vendo pra crer ????
http://pessoal.onda.com.br/qmd
Um Abraço
Werlon Goulart
23/03/2003
Anonymous
[]´ junior
23/03/2003
Anonymous
Vc setou no Delphi o diretorio onde o componente foi instalado ???
Para fazer isto va no Menu ´Tools´ depois em ´Environment Options...´ e depois na paleta ´Library´ e coloque em ´Library Path´ clique no Botao com ´...´ ao lado, depois localize a pasta onde descompactou o pacote e clique em ´ADD´ e pronto.... teste e veja se funciona.
Comigo funcionou beleza...
Um Abraço
Werlon Goulart
23/03/2003
Anonymous
cara e sse erro que ta dando quando tempo instalar fiz o que voce mandou....
[]´s junior
23/03/2003
Anonymous
cara esse é o erro que ta dando quando temto instalar...fiz o que voce mandou....
[]´s junior
23/03/2003
Anonymous
Instalação:
Nativo: ADO/DBX/IBX : Abra o arquivo: UserControl\UserControls.DPK (Obrigatório). Clique em Install
IBObjects : Abra o arquivo: UserControl\IBOUserControls.DPK . Clique em Install
Zeos Lib : Abra o arquivo : UserControl\ZeosUserControls.DPK. Clique em Install
Menu : Tools => Environment Options : [Library] :
Adicione a Pasta: UserControl\Source
Eu instalei o UserControls.dpk (pois utilizo o IBX...) e funcionou beleza....
Quanto ao erro mencionado.. Nao faço a menor ideia do q seja... E o pior é q vc ta instalando o UserControls.dpk ... O mesmo q eu instalei....
Sei nao qual o erro....
Se quiser te mando o arquivo q baixei da Net.... Dai vc Descompacta e instala .....
werlondelphi@bol.com.br
Um abraço
Werlon Goulart
23/03/2003
Anonymous
[]´ junior
24/03/2003
Anonymous
Este deve ser o erro.... Mas vc pode altera-lo.
Os Bancos q foram testados para ele são (peguei em http://pessoal.onda.com.br/qmd/) :
Banco de Dados D6 D7
ADO
Access 2000 (mdb) OK OK
MS SQL Server 7 e 2000 OK OK
DBExpress
MySQL 3.23.52-nt OK OK
Interbase 6 - OK
Interbase 6.5 - OK
Firebird 1 RC2 OK OK
Firebird 1.5 Alpha 5 - OK
MS SQL Server - BAD
IBExpress
Interbase 6 - OK
Interbase 6.5 - OK
Firebird 1 RC2 OK OK
Firebird 1.5 Alpha 5 - OK
IBObjects
Interbase 6 - OK
Interbase 6.5 - OK
Firebird 1 RC2 OK OK
Zeos Lib
MySQL 3.23.52-nt OK OK
Interbase 6.5 - OK
Firebird 1 RC2 OK OK
Firebird 1.5 Alpha 5 - OK
MS SQL Server 7 e 2000 OK OK
Um Abraço
Werlon Goulart
24/03/2003
Qmd
Para instalar o Componente UserControls no Delphi 5 vc precisa Abrir o package UserControlsD5.dpk e clicar em Install, vc precisa tbm incluir a pasta source do componente no Library path do Delphi.
Se ainda tiver algum problema para instalar ou usar o componente poste no forum ou entre em contato diretamente comigo.
Caro Werlon Goulart explique melhor esse esquema de protecao que vc usa nos seus sistemas que talvez possamos achar uma solucao para o problema em usar o UserControl. Como nao sei o problema vou dar um palpite: o evento OnStartApplication do componente ocorre antes da criacao do form de login... poderia ser usado no lugar do onCreate do form principal priorizando assim a execucao do seu codigo.
Falow
QmD
qmd@antisocial.com
uin:15630894
http://usercontrol.da.ru
24/03/2003
Qmd
Werlon Goulart, Obrigado pelo apoio...
:wink:
QmD
24/03/2003
Anonymous
o que deveo usar em minha aplicação para colocar o controle de acesso. e como fazer isso precisa de umas dicas, ainda sou iniciante em delphi..
Quando a quele erro anteriormente postado aki quando tempo instalar o USERCONTROL.dpk, ele ainda contunia dando....
[]´ junior ´visitante´
24/03/2003
Qmd
O arquivo USERCONTROL.dpk somente podera ser instalado nos Delphi´s 6 e 7 pro possuir suporte DBX entre outras dependencias.
Outro pacote opcional para Delphi 5 eh o IBOUserControlsD5.dpk caso vc nao use IBO nao tente insta-lo pois ele requer IBO instalado no Delphi.
Seu banco e paradox , certo!? entao vc precisara incluir um componente BDEUserControl no seu form principal e incluir alguns itens adicionais em seu menu.
Crie no TMenu do ligado ao form principal os Itens de menu que serao utilizados para abrir as janelas exibidas pelo componente. Poderia sem algo assim:
Segurança
->Cadastro de Usuarios
->Perfil de Usuarios
->Trocar Senha
Entao vc ira informa esses itens que vc criou nas propriedades do componente:
MenuCadastroUsuario, MenuPerfilUsuario e MenuTrocaSenha
Outro requerimento e que o seu TDatabase esteja no form Principal, preencha no Database no componente ...
Ai eh rodar o programa que as tabelas e usuario inicial serao criados automaticamente.
Se preferir veja o Demo na pasta \Demos\BDE
Falow
QmD
24/03/2003
Anonymous
Tenho muito a lhe agradecer, pela atenção dispensada com um iniciante.
Fico feliz por saber que ainda existem pessoas que estão dispostas a ensinar os outros..
grato
[]´s
junior
24/03/2003
Anonymous
preciso de ajuda..
tenho botoes de determinados cadastros no meu formPrincipal.
Cadastro Professores
Cadastro Alunos
Cadastro Transportes
tipo, somente o usuario Admin pode ter acesso a tudo..o outro somente a
Cadastro de ALunos..enfim..
sei que tenho de usar o Action list, nao sei como usar, alguem tem algo
que posso me ajudar, ou dar umas dicas...
[]´s junior
Clique aqui para fazer login e interagir na Comunidade :)