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

Turbo Pascal Discussion :

[TPW]EnumWindowsProc


Sujet :

Turbo Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre Expert
    Avatar de Sub0
    Homme Profil pro
    Développeur Web
    Inscrit en
    Décembre 2002
    Messages
    3 573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52

    Informations professionnelles :
    Activité : Développeur Web

    Informations forums :
    Inscription : Décembre 2002
    Messages : 3 573
    Par défaut [TPW]EnumWindowsProc
    Salut!

    Je cherche à obtenir la liste des applications en cours avec BPW sous 98 & XP...
    J'ai un code en Delphi, mais sa convertion en 16 bits ne fonctionne pas.
    Pouvez-vous m'aider? je sèche grave!

    Merci, à+

  2. #2
    Responsable Pascal, Lazarus et Assembleur


    Avatar de Alcatîz
    Homme Profil pro
    Ressources humaines
    Inscrit en
    Mars 2003
    Messages
    8 049
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Ressources humaines
    Secteur : Service public

    Informations forums :
    Inscription : Mars 2003
    Messages : 8 049
    Billets dans le blog
    2
    Par défaut
    Bonjour !

    Tu peux "scanner" l'ensemble des fenêtres gérées par le gestionnaire de fenêtres, en partant de la fenêtre principale de ton programme, à l'aide de la fonction (16 bits) GetNextWindow.

    - Dans un sens avec le flag GW_HWNDNEXT,
    - Dans l'autre sens avec le flag GW_HWNDPREV.

    Tu peux faire deux fois une petite récursion jusqu'à ce que la fonction renvoie un handle nul (qui indique que tu as atteint l'une des extrémités de la chaîne).
    Règles du forum
    Cours et tutoriels Pascal, Delphi, Lazarus et Assembleur
    Avant de poser une question, consultez les FAQ Pascal, Delphi, Lazarus et Assembleur
    Mes tutoriels et sources Pascal

    Le problème en ce bas monde est que les imbéciles sont sûrs d'eux et fiers comme des coqs de basse cour, alors que les gens intelligents sont emplis de doute. [Bertrand Russell]
    La tolérance atteindra un tel niveau que les personnes intelligentes seront interdites de toute réflexion afin de ne pas offenser les imbéciles. [Fiodor Mikhaïlovitch Dostoïevski]

  3. #3
    Membre Expert
    Avatar de Sub0
    Homme Profil pro
    Développeur Web
    Inscrit en
    Décembre 2002
    Messages
    3 573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52

    Informations professionnelles :
    Activité : Développeur Web

    Informations forums :
    Inscription : Décembre 2002
    Messages : 3 573
    Par défaut
    Oui, c'est bien vu!

    Mais entre temps, j'ai trouvé un autre moyen avec FindWindow: Mon objectif était de savoir si un programme est actif ou non, et pour cette opération, j'ai trouvé un thread sur le site qui disait de poster un message à l'appli, pour que cette dernière retourne un message de confirmation, sinon, cela signifie qu'elle n'est plus active. Avec cette méthode, il ya un problème lorsque les messages sont bloqués...

    En ayant la liste de toutes les appli en cours, c'est évidemment plus efficace.
    Et avec FindWindow, c'est plus rapide, mais est-ce-mieux?
    Je vais tester pour voir si ça fonctionne bien sous XP, comme sous 98.

    J'espère que ce thread servira aussi à d'autres membres!

    Merci, à+

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

Discussions similaires

  1. [TPW]TPW et sons
    Par Loceka dans le forum Turbo Pascal
    Réponses: 7
    Dernier message: 25/08/2004, 22h22
  2. [TPW]Boites de dialogue
    Par francoistpw dans le forum Turbo Pascal
    Réponses: 7
    Dernier message: 29/06/2004, 14h05
  3. [TPW]J'ai besoin de WINCRT
    Par luno2545 dans le forum Turbo Pascal
    Réponses: 7
    Dernier message: 18/01/2004, 22h00
  4. tpw turbo pascal for windows
    Par tripper.dim dans le forum Turbo Pascal
    Réponses: 3
    Dernier message: 29/11/2003, 23h06
  5. [TPW][cours]Demande d'aide pour finir un programme
    Par jf dans le forum Turbo Pascal
    Réponses: 21
    Dernier message: 16/06/2003, 18h10

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