none
Connaitre la position de la barre des t?ches RRS feed

  • Question

  • Bonjour
     
    Bonne ann?e ? tous.
    je cherche ? savoir comment d?terminer la position de la barre des taches
    pour positionner une fen?tre juste au dessus.
    Cette fen?tre petite sera en plus en "Topmost " j'ai l'API qui faut pour
    cela.
     
    Dans un deuxi?me temps, je souhaiterai faire apparaitre une fenetre comme
    celle par exemple de message d'Avast : une fen?tre qui surgit du bas.
     
    merci pour vox pistes
     
     
     

    Drissou
    dimanche 2 janvier 2011 21:55

Réponses

  • Bonsoir 
     
    ça y est j'ai trouvé une procédure pour avoir les coordonnées de cet espace de travail windows
     
     
    Public Type RECT
       Left As Long
       Top As Long
       Right As Long
       Bottom As Long
    End Type
     

    Public Const SPI_GETWORKAREA = 48
    Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
    Dim typRect As RECT
     
    Call SystemParametersInfo(SPI_GETWORKAREA, vbNull, typRect, 0)
     
    With typRect
        lngTop = .Top * Screen.TwipsPerPixelY
        lngLeft = .Left * Screen.TwipsPerPixelX
        lngRight = .Right * Screen.TwipsPerPixelX
        lngBottom = .Bottom * Screen.TwipsPerPixelY
    End With
    "Drissou" <=?utf-8?B?RHJpc3NvdQ==?=> a écrit dans le message de news: 9995713a-162d-4352-8fc0-592d1fe6fe2e...
    Bonjour
     
    Bonne ann?e ? tous.
    je cherche ? savoir comment d?terminer la position de la barre des taches
    pour positionner une fen?tre juste au dessus.
    Cette fen?tre petite sera en plus en "Topmost " j'ai l'API qui faut pour
    cela.
     
    Dans un deuxi?me temps, je souhaiterai faire apparaitre une fenetre comme
    celle par exemple de message d'Avast : une fen?tre qui surgit du bas.
     
    merci pour vox pistes
     
     
     

    Drissou

    Drissou
    • Marqué comme réponse Alex Petrescu mardi 4 janvier 2011 15:56
    dimanche 2 janvier 2011 22:25

Toutes les réponses

  • Bonsoir 
     
    ça y est j'ai trouvé une procédure pour avoir les coordonnées de cet espace de travail windows
     
     
    Public Type RECT
       Left As Long
       Top As Long
       Right As Long
       Bottom As Long
    End Type
     

    Public Const SPI_GETWORKAREA = 48
    Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
    Dim typRect As RECT
     
    Call SystemParametersInfo(SPI_GETWORKAREA, vbNull, typRect, 0)
     
    With typRect
        lngTop = .Top * Screen.TwipsPerPixelY
        lngLeft = .Left * Screen.TwipsPerPixelX
        lngRight = .Right * Screen.TwipsPerPixelX
        lngBottom = .Bottom * Screen.TwipsPerPixelY
    End With
    "Drissou" <=?utf-8?B?RHJpc3NvdQ==?=> a écrit dans le message de news: 9995713a-162d-4352-8fc0-592d1fe6fe2e...
    Bonjour
     
    Bonne ann?e ? tous.
    je cherche ? savoir comment d?terminer la position de la barre des taches
    pour positionner une fen?tre juste au dessus.
    Cette fen?tre petite sera en plus en "Topmost " j'ai l'API qui faut pour
    cela.
     
    Dans un deuxi?me temps, je souhaiterai faire apparaitre une fenetre comme
    celle par exemple de message d'Avast : une fen?tre qui surgit du bas.
     
    merci pour vox pistes
     
     
     

    Drissou

    Drissou
    • Marqué comme réponse Alex Petrescu mardi 4 janvier 2011 15:56
    dimanche 2 janvier 2011 22:25
  • Hello Driss,

     

    Très bonne année à toi !

    Je te donne un lien, je pense utile à tous, d'un projet de Pierre Alexis, membre historique et webmaster de (feu) la FAQ VB:

    http://palexis.free.fr/index.php?target=pwm

    Ce projet vaut VRAIMENT le détour : excellente réalisation, et une foule de choses à apprendre en lisant le programme.

     

    Cordialement,

    Jean-marc

     

     


    Jean-marc
    • Proposé comme réponse EhJoe mardi 4 janvier 2011 09:25
    dimanche 2 janvier 2011 22:32
  • Salut Jean Marc
     
    Décidement tu as réponse à tout.
    C'est tout à fait ce qu'il me faut.
     
    merci
     
    "Jean-marc Noury" <=?utf-8?B?SmVhbi1tYXJjIE5vdXJ5?=> a écrit dans le message de news: b610f503-3b11-4430-b409-7da753fa0b1e...

    Hello Driss,

     

    Très bonne année à toi !

    Je te donne un lien, je pense utile à tous, d'un projet de Pierre Alexis, membre historique et webmaster de (feu) la FAQ VB:

    http://palexis.free.fr/index.php?target=pwm

    Ce projet vaut VRAIMENT le détour : excellente réalisation, et une foule de choses à apprendre en lisant le programme.

     

    Cordialement,

    Jean-marc

     

     


    Jean-marc

    Drissou
    dimanche 2 janvier 2011 23:26