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


4 participantes

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    mfmaiafilho
    mfmaiafilho
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 410
    Registrado : 02/08/2018

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  mfmaiafilho 10/4/2021, 00:25

    Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
    Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long) As Long
    Private Declare Function SetLayeredWindowAttributes Lib "user32" _
    (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long


    como faço pra corrigir isso? já coloquei as bibliotecas de referencias porem não resolve...

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Erro10
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2741
    Registrado : 23/01/2018

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty Re: [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  crysostomo 10/4/2021, 01:40

    Antes do Function coloque ptrsafe


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty Re: [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  DamascenoJr. 11/4/2021, 01:14

    Tópico movido da sala de Formulários para a sala de Módulos e VBA. Atentar-se a descrição de cada sala ao abrir tópicos.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    mfmaiafilho
    mfmaiafilho
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 410
    Registrado : 02/08/2018

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty Re: [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  mfmaiafilho 12/4/2021, 16:58

    perdão mestre não me atentei a classificação do topico,

    rodou normal colocando PtrSafe na frente da function,

    agora uma dúvida, eu to testando em outros offices, outras máquinas pra validar se realmente vai ficar bom e se vai rodar em todas as máquinas entende?

    existe algo pra impedir isso de acontecer ?

    se eu usar muitas bibliotecas de referencias algo do tipo?
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3491
    Registrado : 13/12/2016

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty Re: [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  Alexandre Fim 12/4/2021, 17:15

    Olá Mizael,

    Apenas complementando o post do @crysostomo, é necessário aplicar as validações de API's tanto para 32 quanto para 64 bits.
    Desta forma, teu sistema pode rodar em qualquer arquitetura do Office. Sege exemplo:

    Código:


    #if Win64 then
      Declare PtrSafe Function MyMathFunc Lib "User32" (ByVal N As LongLong) As LongLong
    #else
      Declare Function MyMathFunc Lib "User32" (ByVal N As Long) As Long
    #end if
    #if VBA7 then
      Declare PtrSafe Sub MessageBeep Lib "User32" (ByVal N AS Long)
    #else
      Declare Sub MessageBeep Lib "User32" (ByVal N AS Long)
    #end if


    Espero ter ajudado.

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Setinf11
    Sistemas e Tecnologia Ltda

    Conteúdo patrocinado


    [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo Empty Re: [Resolvido]Estou com problemas em compatibilidade na tela inicial do meu aplicativo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 20:46