MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Refresh ao utilizar a barra de rolagem no form

    Compartilhe

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    [Resolvido]Refresh ao utilizar a barra de rolagem no form

    Mensagem  charlehardware em Qui 01 Fev 2018, 05:12

    O Problema e que semple que utilizo a barra de rolagem no formulário com muitos objetos, come players entre outros
    o mesmo desorienta as imagens (as vezes acontece as vezes não)

    percebi que o comando: Refresh resolve

    conseguir resolver em parte assim:

    Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
    Me.Form.Refresh
    End Sub

    desse modo ao utilizar o bola do mouse o formulário desorienta mas limpa ao mesmo tempo sanando o problema
    mas se o cliente utilizar a barra de rolagem no formulário o problema volta.

    agora queria algo que ao utilizar a barra de rolagem do form o refresh rodasse junto ou no fim
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3161
    Registrado : 29/06/2012

    Re: [Resolvido]Refresh ao utilizar a barra de rolagem no form

    Mensagem  Noobezinho em Qui 01 Fev 2018, 18:00

    Charle

    Pesquisei na net e vi esse artigo:

    Copie e cole para o navegador:

    tek-tips.com/viewthread.cfm?qid=192036

    Embora o artigo que está em Inglês diga  "Desativando a roda Autoscroll no mouse" (Disabling Autoscroll wheel on Mouse?),

    Acredito que ele dê a solução que precisa.

    Colei aqui parte que ele usa para você definir o que quer:


    Private Sub clsMouseWheel_MouseWheel (Cancelar como Inteiro)
        'Este é o procedimento do evento onde você pode
        ' decidir o que fazer quando o usuário rola o mouse.
        'Se configuração Cancelar = Verdadeiro, desativamos a roda do mouse
        ' neste formulário.

        MsgBox "Você não pode usar a roda do mouse para percorrer os registros".
        Cancelar = True
    End Sub

    Veja o artigo com calma, se não sabe inglês, use o traduzir para o português, do google.
    Eles alertam que não deve usar o código quando está programando, ou seja com a página VBA aberta, vai dar erro.
    Então, quando for testar, saia do access e abra novamente, ou feche todo o VBA.
    FAÇA BACKUP ANTES !!!

    Retorne o resultado.

    [ ]'s


    .................................................................................
    Noobezinho

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se ajudamos alguém e não retornou.
    Se não deu retorno, não ajudo novamente .

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    opa amigo obg pela atenção

    Mensagem  charlehardware em Sex 02 Fev 2018, 05:04

    Traduzir todo site, mas eu não quero desativar o roda do mouse, pelo contrario ela vai ser muito usada,
    o que quero é quando clicar na barra de rolagem (não a roda do mouse) do form que fica do lado direito ele execute um
    Me.Form.Refresh.

    fiz uns testes aqui consegui sanar o problema, em > evento > "no atual" (Form_Current)  Me.Form.Refresh
    Pro toda vez que a movimento no form ou na barra de rolagem ele executa o procedimento Me.Form.Refresh

    obg pela atenção Noobezinho cheers


    Última edição por charlehardware em Sex 02 Fev 2018, 16:10, editado 2 vez(es)
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3161
    Registrado : 29/06/2012

    Re: [Resolvido]Refresh ao utilizar a barra de rolagem no form

    Mensagem  Noobezinho em Sex 02 Fev 2018, 09:14

    Na realidade aquele algoritmo faz outras coisas, além de desativar ou não, a roda do mouse.

    Mas realmente não me ative ao que escreveu na última linha do teu  post.

    Valeu o retorno.

    Só falta colocar o Resolvido no título do post.

    Se precisar, na minha assinatura mostra como fazê-lo.

    Boa sorte, amigo!


    .................................................................................
    Noobezinho

    * A solução funcionou?  [Você precisa estar registrado e conectado para ver esta imagem.] 
    Agradeça e feche o tópico clicando no botão Resolvido
    Se não sabe como, veja [Você precisa estar registrado e conectado para ver este link.].

    Como anexar imagem no teu post do fórum : [Você precisa estar registrado e conectado para ver este link.]

    * Criar arquivos.zip com o Winrar - veja [Você precisa estar registrado e conectado para ver este link.].

    Atualmente estou verificando se ajudamos alguém e não retornou.
    Se não deu retorno, não ajudo novamente .

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    ok

    Mensagem  charlehardware em Sex 02 Fev 2018, 16:12

    ok

      Data/hora atual: Qua 21 Fev 2018, 15:08