23/04/2024
Windev et les Api Windows
Nb de visiteurs en ligne : 1
>> Introduction <<
>> Codes et Forum <<
>> Download <<
Rubrique
: 1 - Windows Général
Sujet
: Déterminer le nombre de dpi (écran et imprimante)
Auteur
Message
°¨¨ JL ¨¨°
Posté le : 23/06/2000 12:00:00
// Pour l'écran
dc est un entier long = appeldll32("gdi32","CreateICA","Display",null,null,null)
si dc alors
LOGPIXELSX est un entier = 88
LOGPIXELSY est un entier = 90
nbpx est un entier = AppelDLL32("gdi32","GetDeviceCaps" , dc , LOGPIXELSX)
nbpy est un entier = AppelDLL32("gdi32","GetDeviceCaps" , dc , LOGPIXELSY)
info(nbpx+" "+nbpy)
appeldll32("gdi32","DeleteDC",dc)
fin
// Pour l'imprimante
dc est un entier long = appeldll32("gdi32","CreateICA","Winspool","HP LaserJet 5000 PCL 6",null,null)
si dc alors
LOGPIXELSX est un entier = 88
LOGPIXELSY est un entier = 90
nbpx est un entier = AppelDLL32("gdi32","GetDeviceCaps" , dc , LOGPIXELSX)
nbpy est un entier = AppelDLL32("gdi32","GetDeviceCaps" , dc , LOGPIXELSY)
info(nbpx+" "+nbpy)
appeldll32("gdi32","DeleteDC",dc)
fin