Controle de acesso de usuários e grupos da aplicação através de menu dinâmico

21/04/2013

4

Boa noite pessoal,

Tenho o exemplo baixado desse link:

[url]http://www.devmedia.com.br/artigo-clube-delphi-76-controle-de-acesso/11344[/url]

O que acontece é o seguinte:

Gostaria de colocar o exemplo para funcionar mas com os seguinte bancos: ACCESS ou FIREBIRD

Esse exemplo é exatamente o que preciso, mas não estou conseguindo fazê-lo funcionar. Alguém me ajuda?
Responder

Posts

Alguém?
Responder
No aguardo de alguma ajuda.
Responder
A idéia é definir os privilégios de acesso dos usuários e grupos do sistema no banco de dados e habilitar as opções do menu principal (MainMenu) e dos botões das telas de cadastro, de acordo com esses privilégios.

Responder
ninguém?
Responder
cade os feras em delphi pra ajudar?
Responder

22/04/2013

Evandro Viana

Um componente muito bom que já faz todo esse processo de verificação e bloqueio de permissões através dos privilégios de usuários e grupos é o componente UserControl e o melhor de tudo é que ele é OpenSource. O único problema que ele foi descontinuado, mas por ser um componente muito bom existem várias pessoas que continuaram por si mesmo desenvolver ele. Tenho uma versão aqui que é compatível até versão XE3.

UserControl XE3:

http://www.mediafire.com/download.php?og8lp2yi3sc5czt
Responder
Como instalar, to tentando igual loko, no XE3.
Responder
Evandro Bastos Viana,

Como instalar no XE 3? Eu queria também aprender a fazer pra não ter que usar componentes de terceiros, queria usar nativos do Delphi.
Responder
Como que instalo no XE3? Não to conseguindo....
Responder

23/04/2013

Welson Play

A instalação é bastante simples. Te um Grupo chamado XE2 é só abrir ele que aparecerá todos os componentes iniciais para serem compilados, foi um pequeno erro, apesar de ser XE2, mas é para o XE3.

É só seguir a ordem de instalação:

1)É necessário informar aonde estão os fontes do UserControl, vá no menu Tools -> Options -> Library -> Library Path -> Clica nos três pontinhos e adiciona os seguintes caminhos.

(Caminho aonde está a pasta)\UserControl XE3\Source

2) Compile o pacote pckUCDataConnector_XE3.dproj
3) Depois compile o pacote pckUserControl_RT_XE3.dproj
4) Agora compile os seguintes pacotes e instale o mesmo: pckUserControl_DT_XE3.dproj, pckUCDBXConn.dproj,pckUCMidasConn.dproj

Depois que esses pacote forem devidamente compilados e instalados vamos instalar os conectores.

1)É necessário informar aonde estão os fontes do Conectores, vá no menu Tools -> Options -> Library -> Library Path -> Clica nos três pontinhos e adicione os caminhos dos conectores que você vai utilizar.

Exemplo:

(Caminho aonde está a pasta)\UserControl XE3\Packages\Connectors\UCDBXConn
(Caminho aonde está a pasta)\UserControl XE3\Packages\Connectors\UCMidasConn

Obs.: Para aqueles que querem usar o UserControl no DataSnap devem utilizar o conector UCMidasConn.

2) A instalação dos conectores também é bastante simples abra os conectores que deseja instalar compila e instala.

Existe um terceiro e ultima parte da instalação, mas ela é opcional. Existe um último pacote que é o histórico, ou seja o controle do histórico da aplicação e sua instalação também é bastante simples:

1)É necessário informar aonde estão os fontes do UserControl, vá no menu Tools -> Options -> Library -> Library Path -> Clica nos três pontinhos e adiciona o seguinte caminho.

(Caminho aonde está a pasta)\UserControl XE3\UCHistórico

2) Abra o grupo GHistorico.groupproj, que está na pasta UCHistórico e compile o único pacote que está dentro dele e instale o mesmo.

Pronto sua instalação do UserControl está completa.


Responder
Ok, tentei instalar o Conector ADO e não estou conseguindo.
Responder
Então, antes de tudo, abro esse arquivo para começar a instalar, XE2.groupproj, certo?
Responder
Everson,
Quando executo a aplicação, pede usuário e senha, como o banco está vazio, coloquei na mão na tabela usuários. Não entra, o que pode ser? Teria que gerar um script para cadastrar valores nas tabelas?
Responder

23/04/2013

Welson Play

FREDERICO qual foi o problema que você enfrentou ao instalar o conector no Delphi XE3?


Responder

23/04/2013

Welson Play

FREDERICO quando iniciar pela primeira vez o UserControl ele pede a senha para se conectar com o banco e se ele não encontrar a estrutura ele roda o script automaticamente.
Responder