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

    Fundo do acess

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1751
    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?


    .................................................................................
    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 : 2892
    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 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1751
    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.


    .................................................................................
    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 : 259
    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 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1751
    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


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 24/7/2021, 08:02