Usando Access

Efeitos especiais nos botões

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

Usuário José:

Bom dia!

Tenho alguns botões de comando em um formulário. Como faço para que apresentem um efeito do tipo "elevado", na medida em que o mouse for sendo passado sobre eles e logo após esta ação, retornem à formatação inicial?

Ex:

- inicialmente: me!botao.bordercolor='branco';

- ao passar o mouse sobre: me!botao.bordercolor= 'azul';

- depois volta ao inicial.

Funcionou com o código abaixo, porém o formulário fica o tempo todo piscando (aí complica).

Private Sub botao_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single)
  Me!botao.bordercolor = 'cor x'
End Sub

Private Sub Detalhe_MouseMove(Button As Integer,Shift As Integer,x As Single,Y As Single)
  Me!botao.bodercolor='cor y' 
End Sub

Suporte:

José,

baixe o projeto exemplo (não é de minha autoria), teste e veja se lhe atende.

Abra o formulário e passe o mouse sobre os botões e veja o efeito esperado.

Usuário José:

Atende muito bem!

Terei agora que adequar ao aplicativo, muito obrigado!

Download

botoes.zip

| Home | Vídeos | Tutoriais | Dicas | Ribbons | Suporte | Downloads | Contato | Artigo |