Ícone do sistema no Windows 10

Moderador: Avelino Sampaio

Avatar do usuário
Ronaldo Costa
Mensagens: 46
Registrado em: 06 Jun 2015, 20:25

Ícone do sistema no Windows 10

Mensagempor Ronaldo Costa » 28 Set 2017, 21:25

Olá Avelino.

A muito tempo uso a função do seu frmLogin para que o ícone do meu aplicativo apareça na barra de ferramenta, conforme abaixo:

Private Function fncTítuloUsuário(usuário As String)
On Error Resume Next
Dim myIcon As String
myIcon = CurrentProject.Path & "\Imagens\sa.ico"
CurrentDb.Properties("AppTitle") = "Sistema S-Escola v.4 | Usuário Atual: " & UCase(fncNomeUsuario)
SetFormIcon Me.hWnd, myIcon
CurrentDb.Properties("AppIcon") = myIcon
Application.RefreshTitleBar
End Function

No entanto, ela não tem funcionado no windows 10. O que preciso fazer para que funcione tão bem como no Win 7?

grato

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.


Avatar do usuário
Ronaldo Costa
Mensagens: 46
Registrado em: 06 Jun 2015, 20:25

Re: Ícone do sistema no Windows 10

Mensagempor Ronaldo Costa » 12 Out 2017, 12:00

Nem Avelino e ninguém pode me dar uma apoio neste caso?
Por que?
Acho que é importante pra mim e pra outros.

Avatar do usuário
Avelino Sampaio
Mensagens: 2052
Registrado em: 04 Jun 2015, 18:27
Contato:

Re: Ícone do sistema no Windows 10

Mensagempor Avelino Sampaio » 12 Out 2017, 15:05

Ronaldo,

esta linha abaixo se trata de uma API ? Se sim, cole aqui a API para eu testar no Windows 10

...
SetFormIcon Me.hWnd, myIcon
...

Aguardamos
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================

Assis
Mensagens: 77
Registrado em: 11 Nov 2015, 15:33

Re: Ícone do sistema no Windows 10

Mensagempor Assis » 12 Out 2017, 18:36

Mestre Avelino
Repare na imagem que anexo
Obrigado
Anexos
Icon.png
Icon.png (22.53 KiB) Visto 58 vezes

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.


Avatar do usuário
Ronaldo Costa
Mensagens: 46
Registrado em: 06 Jun 2015, 20:25

Re: Ícone do sistema no Windows 10

Mensagempor Ronaldo Costa » 14 Out 2017, 14:22

Sim Avelino. É uma API.

Avatar do usuário
Avelino Sampaio
Mensagens: 2052
Registrado em: 04 Jun 2015, 18:27
Contato:

Re: Ícone do sistema no Windows 10

Mensagempor Avelino Sampaio » 16 Out 2017, 11:27

Ronaldo,

não atendeu a minha solicitação.

Aguardamos
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================

Avatar do usuário
Ronaldo Costa
Mensagens: 46
Registrado em: 06 Jun 2015, 20:25

Re: Ícone do sistema no Windows 10

Mensagempor Ronaldo Costa » 16 Out 2017, 13:11

Desculpe mestre, a minha ignorância. Eu não sei si é uma API.

desculpe mesmo.

Avatar do usuário
Damasceno Jr.
Mensagens: 316
Registrado em: 08 Jun 2015, 01:30
Localização: Medicilândia-Pará

Re: Ícone do sistema no Windows 10

Mensagempor Damasceno Jr. » 21 Out 2017, 03:50

Ronaldo, veja se este tópico ajuda...

viewtopic.php?f=19&t=206

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.



Voltar para “Módulos VBA”

Quem está online

Usuários neste fórum: Nenhum usuário registrado e 2 visitantes