Este é um post disponível para assinantes MVPVideo: Rad Studio 2007-DBX4 e Firebird 2.0-Aplicação comercial de vendas do Inicio ao Fim-Parte 30-Controle de Acesso em Nível de tela 3
Nesta vídeo, criaremos também a rotina para carregar no DBComboBox o caption de todos os forms.
Título:
Tempo: 18:52min
Resumo: Desde o início de nossa vídeo aula temos sempre primado pela coesão, baixo acoplamento e reaproveitamento de código. Durante as duas últimas vídeos aulas temos trabalhado no sistema de controle de acesso em nível de tela e nesta vídeo lançamos mão da herança para que todos os Forms da aplicação estejam aptos para se “moldar” de acordo com a permissão que o usuário logado tem para ele.
Metodologia de desenvolvimento do exemplo: Em primeiro lugar transpomos a infra-estrutura que controla o acesso aos forms para o formulário modelo, desta forma todos os forms serão controlados. Na sequência criamos a rotina para carregar no DBComboBox o caption de todos os forms já cadastrados, sempre usando as classes DBX4.
Tecnologias utilizadas: RadStudio 2007, FireBird2.0, DBX4
Exemplos construídos: Controle de Acesso.
Palavras chaves: Delphi2007, DBX4, DBComboBox, Acesso.

13 COMENTÁRIOS
tem um pequeno bug no formulario de acesso, o DBComboBox1 está setado dentro do frmAcesso e não para o TbCasdastro, sendo assim quando mudamos para o modo de visualização em Grid o DBComboBox1 continua na tela...
Sei que é simples de resolver, um simples Ctrl+C e Ctrl+V no componente DBComboBox1 resolve, ou na janela de Structure fazer um Drag Drop...
e Obrigado por ter voltado a fazer as videos...
Reparei isso hoje assistindo a vídeo. Ja foi corrigido.
Na verdade eu fiz de proposito so pra ver quem estava prestrando atenção. KKKKKKKKKKKKKK
Obrigado !!

A princípio a única atualização seria o dirver. No site do thiago Borges tem a versão do driver para D2009. Basta baixar e instalar. Em relação ao projeto a única coisa que vai acontecer e que o Delphi vai gerar um Warnning para todas as linhas onde tiver GetAnsiString.
Isso por que o Delphi 2009 vem com suporte e caracteres unicode, de byte duplo, então o delphi apenas te chama atenção para tal fato.
Abs !!!

Obrigado Pela parte que me toca. Espero nunca sofrer deste mal rsrsrsrsrsrrs!
Mas de qualquer forma agradeço !!
Abs !!!

Para que possamos enviar comandos SQL via ClientDataSet então temos que configurar o DataSetProvider, isto mesmo !
É o DataSetProvider que permite ou não que isto acontece. Para que ele posso permitir basta selecioná-lo e na propriedade Options setar a opção poAllowCommand para true. Agora poderá enviar para para o bancos comandos Sql via ClienteDataSet.
Vamos abordar isso na Tela de Vendas !!!
Abs !!!!

Para isso e que temos a opção de enviar comandos Sql pelo ClientDataSet. Não justifica fazer isso em outra situação.
Abraços !!!

Pô, você não tem que agradecer NADA !!!.
Fico muito feliz pelas suas palavras. Como todos que acompanham minhas aulas sabem, que para mim, transmitir o pouco de conhecimento que tenho é o maior prazer. Tenho recebidos muitos email de pessoas de todos os lugares do Brasil que tem acompanhado minhas aulas e o que mais me motiva e saber que pude contribuir de alguma maneira.
Tenho muitos, mais muitos projetos de videos e cursos para colocar em prática em 2009 e a participação de todos vocês é essencial acompanhando, sugerindo, comentando, reclamando, enfim, participando ativamente. Temos muito trabalho pela frente.
Grande abraço e como eu mesmo digo: Pela sua atenção e a de todos muito obrigado !!
Curso(s):
Space do autor

download

4
1
