Recupérer la cle concernant la résolution dans la base de registre

Messages postés
1
Date d'inscription
mercredi 3 juillet 2002
Statut
Membre
Dernière intervention
4 juillet 2002
-
Messages postés
133
Date d'inscription
dimanche 28 avril 2002
Statut
Membre
Dernière intervention
15 janvier 2009
-
Je voudrais récupérer cette clef afin de déterminer quel est la résolution du poste. Je pourrais comme cela adapter mes applications avec la résolution.
merci de ce rensignement.

Sash
"Et dieu créea l'homme... . J'éspére simplement qu'il a une bonne excuse."
Woody Allen.

1 réponse

Messages postés
133
Date d'inscription
dimanche 28 avril 2002
Statut
Membre
Dernière intervention
15 janvier 2009
3
salut,

une source pour récupérer la résolution existe sur ce site, mais elle n'utilise pas la BDR, voilà ce que ca donne :

Private Sub Bouton1_Click()
Largeur% = Screen.Width \ Screen.TwipsPerPixelX
Hauteur% = Screen.Height \ Screen.TwipsPerPixelY
MsgBox "Résolution de l'écran : " & Chr$(10) & Str$(Largeur%) + " x" + Str$(Hauteur%), vbInformation
End Sub

Désolé pour l'auteur de ce code, je sais plus qui c'est.

@+