IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

GetDC - Autre écran [Toutes versions]


Sujet :

VBA Access

  1. #1
    Membre expérimenté Avatar de Gado2600
    Homme Profil pro
    Développeur Office VBA
    Inscrit en
    Mai 2013
    Messages
    903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur Office VBA

    Informations forums :
    Inscription : Mai 2013
    Messages : 903
    Points : 1 364
    Points
    1 364
    Par défaut GetDC - Autre écran
    Bonjour,

    J'utilise le code suivant pour récupérer le Zoom appliqué sur l'écran principal (c'est fonctionnel) mais j'aimerais pouvoir faire de même sur un second écran.

    En vous remerciant par avance,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    Function funcZoomWindows() As Double
        Dim dblValue    As Double
        Dim lngDC       As Long
     
        ' Calculs relatifs à l'écran
        lngDC = GetDC(0) 'HWND_DESKTOP)
        dblValue = GetDeviceCaps(lngDC, LOGPIXELSX)
        'dblvalue = GetDeviceCaps(lngDC, LOGPIXELSY)
        ReleaseDC HWND_DESKTOP, lngDC
     
        Select Case dblValue
            Case 96: funcZoomWindows = 100
            Case 120: funcZoomWindows = 125
            Case 144: funcZoomWindows = 150
            Case 192: funcZoomWindows = 200
            Case Else: funcZoomWindows = 100
        End Select
    End Function
    Le sabre est une arme. Le kendo est un art de tuer. Quelles que soient les belles paroles pour l'expliquer, telle est sa vérité.

  2. #2
    Rédacteur/Modérateur

    Avatar de User
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Août 2004
    Messages
    8 282
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Août 2004
    Messages : 8 282
    Points : 19 479
    Points
    19 479
    Billets dans le blog
    64
    Par défaut
    Bonjour,

    Tu as créé tes formulaires avec quelle résolution de base (en pixels) sur ton écran d'origine pour le 100% ?

    Et tu as quoi sur ton autre écran ?
    Vous trouverez dans la FAQ, les sources ou les tutoriels, de l'information accessible au plus grand nombre, plein de bonnes choses à consulter sans modération

    Des tutoriels pour apprendre à créer des formulaires de planning dans vos applications Access :
    Gestion sur un planning des présences et des absences des employés
    Gestion des rendez-vous sur un calendrier mensuel


    Importer un fichier JSON dans une base de données Access :
    Import Fichier JSON

  3. #3
    Membre expérimenté Avatar de Gado2600
    Homme Profil pro
    Développeur Office VBA
    Inscrit en
    Mai 2013
    Messages
    903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur Office VBA

    Informations forums :
    Inscription : Mai 2013
    Messages : 903
    Points : 1 364
    Points
    1 364
    Par défaut
    Bonjour,

    Désolé mais je ne vois pas trop le rapport entre nos questions

    C'est pour un cas pratique général.

    L'objectif de récupérer cette information est, de pouvoir centrer un formulaire sur l'écran sur lequel il est.
    Sauf que le déplacement d'un formulaire n'aura pas le même effet attendu entre le zoom 100% et 125% d'un écran.

    Par exemple, mon écran principal est sur 100% et le second écran sur 125%.
    Pour centrer sur le 1er écran, pas de soucis.
    Sur le second, je dois appliquer le ratio 1.25 pour avoir le bon centrage.

    Je sais récupérer le 100% car c'est mon écran principal.
    Par contre, le 125% de l'écran 2, je ne sais pas.
    D'où ma question

    Merci pour l'intérêt porté à ma demande
    Le sabre est une arme. Le kendo est un art de tuer. Quelles que soient les belles paroles pour l'expliquer, telle est sa vérité.

  4. #4
    Membre expérimenté Avatar de Gado2600
    Homme Profil pro
    Développeur Office VBA
    Inscrit en
    Mai 2013
    Messages
    903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur Office VBA

    Informations forums :
    Inscription : Mai 2013
    Messages : 903
    Points : 1 364
    Points
    1 364
    Par défaut
    Bon, en fait, j'ai trouvé une alternative à mon problème.

    Encore merci quand même.

    Cordialement,
    Le sabre est une arme. Le kendo est un art de tuer. Quelles que soient les belles paroles pour l'expliquer, telle est sa vérité.

  5. #5
    Expert éminent sénior
    Avatar de tee_grandbois
    Homme Profil pro
    retraité
    Inscrit en
    Novembre 2004
    Messages
    8 673
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : retraité

    Informations forums :
    Inscription : Novembre 2004
    Messages : 8 673
    Points : 14 664
    Points
    14 664
    Par défaut
    bonjour,
    Citation Envoyé par Gado2600 Voir le message
    Bon, en fait, j'ai trouvé une alternative à mon problème.

    Encore merci quand même.

    Cordialement,
    on est content pour toi et c'est gentil d'en faire profiter ceux qui pourraient être confrontés au même problème
    Quand on est derrière l'écran on n'a aucun clavier sous les mains ...
    ah non ? donc devant l'écran c'est la connectique ?

  6. #6
    Rédacteur/Modérateur
    Avatar de loufab
    Homme Profil pro
    Entrepreneur en solutions informatiques viables et fonctionnelles.
    Inscrit en
    Avril 2005
    Messages
    12 007
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Entrepreneur en solutions informatiques viables et fonctionnelles.
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Avril 2005
    Messages : 12 007
    Points : 24 579
    Points
    24 579
    Par défaut
    Bonjour,

    Le pointeur de l'écran c'est cette variable : HWND_DESKTOP (pour HookWindow_desktop). Il a été remplacé par un 0

    Il ne manque plus qu'à déterminer le hook de la nouvelle fenêtre.

    Cordialement,
    Détecter les modifications formulaire Cloud storage et ACCESS
    Classe MELA(CRUD) Opérateur IN et zone de liste Opérateur LIKE
    Visitez mon Blog
    Les questions techniques par MP ne sont pas lues et je ne pratique pas la bactériomancie

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 04/10/2017, 09h17
  2. Réponses: 1
    Dernier message: 04/08/2016, 20h40
  3. Popupmenu s'affiche dans un autre écran?
    Par Xavier dans le forum C++Builder
    Réponses: 6
    Dernier message: 21/05/2012, 02h25
  4. Basculer form sur un autre écran
    Par Rifton007 dans le forum Windows Forms
    Réponses: 2
    Dernier message: 23/11/2009, 20h26
  5. [JFrame] Basculer une JFrame sur un autre écran
    Par rno38 dans le forum Agents de placement/Fenêtres
    Réponses: 5
    Dernier message: 15/09/2009, 11h49

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo