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]Erro de compilacao

    Compartilhe
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 675
    Registrado : 07/12/2011

    [Resolvido]Erro de compilacao

    Mensagem  tauron em Sab 15 Ago 2015, 22:43

    Bem habitantes da selva, tenho um bd criado com base em 32 bits e durante teste em pc de 64 bits ele apresentou erro de compilacao:
    "O codigo desse projeto deve ser atualizado para uso de 64 bits.Analise e atualize as instrucoes Declare e em seguida, marque-as com atributo PtrSafe."

    Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long

    Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long



    avatar
    Jungli
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 637
    Registrado : 07/05/2010

    Re: [Resolvido]Erro de compilacao

    Mensagem  Jungli em Sab 15 Ago 2015, 23:37

    Boa noite,

    Tente assim


    Private Declare PtrSsafe Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As LongPtr

    Private Declare PtrSafe Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As LongPtr


    .................................................................................
    "Somos o que repetidamente fazemos.
    A excelência, portanto, não é um feito,
    mas um hábito."

    Aristóteles
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 675
    Registrado : 07/12/2011

    Re: [Resolvido]Erro de compilacao

    Mensagem  tauron em Dom 16 Ago 2015, 01:23

    Muito obrigado funcionou perfeitamente.

      Data/hora atual: Seg 26 Jun 2017, 18:13