MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    Atualizar Ribbons

    avatar
    CEvangelista
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 20
    Registrado : 09/10/2017

    atualizar automaticamente - Atualizar Ribbons Empty Atualizar Ribbons

    Mensagem  CEvangelista 13/9/2022, 18:08

    Olá pessoal!
    Espero que esta mensagem possa encontrar todos de boa saúde...

    Deparei-me com dus dificuldades na construção do meu projecto e necessito da intervenção de vocês, principalmente aqueles que têm mais experiencia com Ribbons.

    1ª : Na minha faixa de Ribbon tenho dois botões com os nomes (btnACaixa e btnFCaixa) onde o primeiro é para abertura de caixa e o segundo é para o fecho do caixa.

    Tenho um formulário com o nome (pu), responsável por fazer o control de acesso ou permissões de usuários.

    No meu módulo (basRibbonCallbacks) tenho o seguinte código:

    Sub GetEnabled(control As IRibbonControl, ByRef enabled)
    Select Case control.ID

    Case "btnACaixa"
    If Forms!pu!Caixa = -1 Then
       enabled = False
       ElseIf Forms!pu!Caixa = 0 Then
       enabled = True
       End If
     
       Case "btnFCaixa"
       If Forms!pu!Caixa = -1 Then
       enabled = True
       ElseIf Forms!pu!Caixa = 0 Then
       enabled = False
       End If

    Case Else
    enabled = True
    End Select
    End Sub

    Agora vai a questão: Quando abro o sistema, os botões recebem as instruções e funcionam correctamente, mas a minha necessidade é que os botões actualizem em tempo de execução de maneiras que quando faço a abertura de caixa, automáticamente o botão ABRIR CAIXA fique desabilitado de maneiras que para estar habilitado novamente tem que se fazer o fecho de caixa e nessa altura o botão FECHAR CAIXA fica desabilitado, mas isso em tempo de execução ou com o programa aberto sem ter que fechar e voltar a carregar...

    Ajudem-me com uma solução para que o sistema possa actualizar a Ribbon sem ter que relinicia-lo.
    Desde já agradeço...

    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

    2ª: Na segunda questão, anexei a imagem...

    Qual é o código que devo usar para abrir um formulário ao carregar uma tabela na Ribbon?
    Anexos
    atualizar automaticamente - Atualizar Ribbons AttachmentSSS.png
    Você não tem permissão para fazer download dos arquivos anexados.
    (88 Kb) Baixado 12 vez(es)
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    atualizar automaticamente - Atualizar Ribbons Empty Re: Atualizar Ribbons

    Mensagem  Avelino Sampaio 21/9/2022, 08:07

    Olá!


    Para atualizar a sua ribbon em tempo de execução utilize o Invalidate ou o InvalidateControl. Veja detalhes neste meu artigo abaixo:

    Copie e cole o endereço abaixo no seu navegador:

    usandoaccess.com.br/tutoriais/video-criar-ribbons-access-getvisible-getimage.asp?id=1#inicio

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.

    CEvangelista gosta desta mensagem

    avatar
    CEvangelista
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 20
    Registrado : 09/10/2017

    atualizar automaticamente - Atualizar Ribbons Empty Re: Atualizar Ribbons

    Mensagem  CEvangelista 26/9/2022, 23:42

    Muito obrigado por disponibilizar seu tempo para me ajudar!
    Vou dar uma olhada no link e depois retorno...

    Conteúdo patrocinado


    atualizar automaticamente - Atualizar Ribbons Empty Re: Atualizar Ribbons

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 21:53