19/04/2024
Windev et les Api WindowsNb 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