1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Ocultar barra de tarefas

Discussão em 'Progress 4GL' iniciado por ueluis, Janeiro 16, 2017.

  1. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Porque eu achei esse comando e traduzi para progress:

    Código:
    PROCEDURE ShowWindow EXTERNAL "user32.dll" :  
        DEF INPUT PARAMETER WindowID AS LONG.
        DEF INPUT PARAMETER Comando AS LONG.
    END.
    
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Consegui fazer o código completo

    Código:
    PROCEDURE FindWindowA EXTERNAL "user32.dll" :  
        DEF INPUT PARAMETER className AS CHARACTER.
        DEF INPUT PARAMETER windowText AS CHARACTER.
        DEF RETURN PARAMETER WindowID AS LONG.
    END.
    
    PROCEDURE ShowWindow EXTERNAL "user32.dll" :  
        DEF INPUT PARAMETER WindowID AS LONG.
        DEF INPUT PARAMETER Comando AS LONG.
    END.
    
    DEF VAR WindowID AS INT64.
    
    RUN FindWindowA(INPUT "shell_trayWnd",INPUT "",OUTPUT WindowID).
    RUN ShowWindow(INPUT WindowID,1). /* 1 = EXIBIR, 0 = OCULTAR */
    
  3. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    O tipo do WindowID pode der INTEGER, eu esqueci de alterar porque estava fazendo testes e tava dando erro.
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Fora esse comando, precisa do EnableWindow pra conseguir ocultar o botão iniciar, porém não consegui resultado:

    Código:
    PROCEDURE EnableWindow EXTERNAL "user32.dll" :  
        DEF INPUT PARAMETER ButtonID AS LONG.
        DEF INPUT PARAMETER iEnable AS LONG.
    END.
    
    DEF VAR btnIniciar AS INTEGER.
    
    RUN FindWindowA(INPUT "Button",INPUT "Start",OUTPUT btnIniciar).
    RUN EnableWindow(INPUT btnIniciar,INPUT 1). /* 1 = EXIBIR, 0 = OCULTAR */
    
  5. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Se não conseguir solução, você pode fazer uma biblioteca em C++ ou talvez Delph e chamar pelo progress, talvez seja mais fácil que ficar achando o código funcional.
  6. ueluis

    ueluis Membro Participativo

    blz @rafael.andrade,
    obrigado pela ajuda vou testar com calma e caso não conseguir vou apelar realmente para delphi ou c++.

    abç

Compartilhe esta Página