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

3 participantes

    Fundo do acess

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

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

    Fundo do acess  Empty Fundo do acess

    Mensagem  crysostomo 13/8/2019, 19:55

    Amigos boa trade sobre a transparecia da janela do Access eu utilizo esse codigo
    Option Compare Database
    Option Explicit


    Código:

    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

    Private Const GWL_EXSTYLE = (-20)
    Private Const WS_EX_LAYERED = &H80000
    Private Const LWA_ALPHA = &H2

    Function Nivel_Transparencia(Escala As Integer)
    Dim lngHwnd As Long
    If Escala < 0 Or Escala > 250 Then Exit Function
    lngHwnd = Application.hWndAccessApp
    SetWindowLong lngHwnd, GWL_EXSTYLE, GetWindowLong(lngHwnd, GWL_EXSTYLE) Or WS_EX_LAYERED
    SetLayeredWindowAttributes lngHwnd, 0, Escala, LWA_ALPHA
    End Function
    mas so que o access abre a janela e fecha ou seja , ele mostra que o access primeiro para depois fechar!
    O que poderia está impedindo-o?


    .................................................................................
    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 : 3705
    Registrado : 22/11/2016

    Fundo do acess  Empty Re: Fundo do acess

    Mensagem  DamascenoJr. 13/8/2019, 23:34

    O usuário do tópico abaixo relata desconforto com o MS Access aparecer primeiro. Veja se o relato e solução dele também te ajuda.
    https://www.maximoaccess.com/t5566-splash-screen-incrementada


    .................................................................................
    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.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

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

    Fundo do acess  Empty Re: Fundo do acess

    Mensagem  crysostomo 14/8/2019, 15:06

    ja tentei ,mas da no mesmo.  no anexo, se der certo no seu é problema do meu access.


    .................................................................................
    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.
    avatar
    Buscador
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 260
    Registrado : 26/02/2011

    Fundo do acess  Empty Re: Fundo do acess

    Mensagem  Buscador 15/8/2019, 21:31

    Boa tarde

    Também uso. No windows e access 2007 funciona muito bem já no windows 10 tanto com access 2007 quanto com o 2016 aparece a janela primeiro e depois ela fecha ficando o fundo escondido.
    Algumas vezes nem fecha o fundo e eu preciso mandar fechar e abrir o aplicativo novamente, aí o aplicativo abre porém sempre o fundo access primeiro, por alguns segundos.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

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

    Fundo do acess  Empty Re: Fundo do acess

    Mensagem  crysostomo 16/8/2019, 16:54

    eu estou nas 3 lutas .
    meu office é 2007 e 2010 32 bits.
    .preciso que ele rode no 64 bits sem sem precisar colocar o PrtSafe em cada function
    .fechar a janela do access
    . e tenho um condigo aqui que ele cria o icone mas continua com icone do access na barra de tarefa


    .................................................................................
    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.

      Data/hora atual: 27/9/2022, 17:51