Gestion de la copie d'écran sur une config deux écrans

Résolu
pyv29
Messages postés
2
Date d'inscription
jeudi 11 septembre 2003
Statut
Membre
Dernière intervention
12 octobre 2007
- 10 oct. 2007 à 16:55
pyv29
Messages postés
2
Date d'inscription
jeudi 11 septembre 2003
Statut
Membre
Dernière intervention
12 octobre 2007
- 12 oct. 2007 à 18:22
Bonjour à tous,
Je voulais savoir si quelqu'un maitrisait un peu la gestion de deux écrans en VB. J'ai une config deux écrans sur mon poste qui me permettent d'avoir un bureau étendu. Mon problème c'est que je ne vois pas comment windows gère mon deuxième écran.

Mon curseur de souris me renvoie les bonnes coordonnées de position mais les infos "Screen.Width / Screen.Height" ne correspondent pas à la taille réelle du bureau, de même pour "Sysinfo.Workareawidth/Sysinfo.Workareaheight" les longueur et largeur correspondent à mon écran principal mais occulte le second.

Ce qui fait que le code qui suit ne prend en compte que mon écran principal.

    Dim Hdc As Long, hwnd As Long, i As Integer, r As Integer, n As Integer
    
    ' Récupère le handle de l'image du Bureau
    hwnd = GetDesktopWindow()
    Hdc = GetDC(hwnd)

    BitBlt EcranSignalisation.Hdc, 0, 0, Screen.Width, Screen.Height, Hdc, 0, 0, ScrCopy

Ou est-ce que je peux récuperer la taille réelle de mon bureau?

Merci d'avance,

PYV

2 réponses

cs_Jack
Messages postés
14007
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
80
10 oct. 2007 à 17:50
Salut
Elle toute fraiche ma source, elle est toute fraiche !
Demandez l'programme
(clique sur ce texte et tu auras tout ce qu'il faut)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
3
pyv29
Messages postés
2
Date d'inscription
jeudi 11 septembre 2003
Statut
Membre
Dernière intervention
12 octobre 2007

12 oct. 2007 à 18:22
Impecap'

Merci bien!!!

PYV
0