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

VB 6 et antérieur Discussion :

[VB6] intercepter un message envoyé avec PostMessage


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Développeur informatique
    Inscrit en
    Août 2002
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Août 2002
    Messages : 106
    Par défaut [VB6] intercepter un message envoyé avec PostMessage
    Bonjour à tous,

    je cherche à établir une communication entre deux de mes programmes, 1 en C# l'autre en VB6.
    J'utilise donc la méthode PostMessage, venant du C++, je suis arrivé facilement à intercepté les messages dans mon programme en C# avec la méthode WndProc. J'ai tenté la même chose en VB6 avec le code suivant:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Public Function WindowProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long)
        If uMsg = WM_CALLPROG Then
            MsgBox ("Message Intercepté")
        End If
    End Function
    WM_CALLPROG est un évènement que j'ai défini moi même (=WM_USER+1)

    Or ce bout de code n'intercepte aucun évènement. Je n'ai pas trouvé de fonction "Overidable" sur le net alors qu'il me semble qu'elle devrait l'être.

    Comment intercepter un message envoyé avec PostMessage en VB6?

    Merci d'avance pour toute réponse et de votre indulgence (on est vendredi et mon cerveau est nase, je suis sûr que c'est pas compliqué mais là, je peux plus)

  2. #2
    Membre confirmé
    Inscrit en
    Mai 2005
    Messages
    125
    Détails du profil
    Informations forums :
    Inscription : Mai 2005
    Messages : 125
    Par défaut
    désolé pas bien lu le message
    t a essay avec l'api getmessage ou peekmessage
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    Declare Function GetMessage Lib "user32" Alias "GetMessageA" (lpMsg As Msg, ByVal hWnd As Long, ByVal wMsgFilterMin As Long, ByVal wMsgFilterMax As Long) As Long
    Type Msg
        hWnd As Long
        message As Long
        wParam As Long
        lParam As Long
        time As Long
        pt As POINTAPI
    End Type
    Type POINTAPI
        x As Long
        y As Long
    End Type

  3. #3
    Membre confirmé
    Profil pro
    Développeur informatique
    Inscrit en
    Août 2002
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Août 2002
    Messages : 106
    Par défaut
    Merci pour ton aide, en fait je cherchais à faire du SubClassing, j'ai trouvé un lien l'expliquant qui m'a permis de résoudre mon problème, mais cet article est sur un site concurrent alors je ne crois pas que je puisse mettre le lien.

    Il suffit d'effectuer une recherche google VB6 & Subclassing et vous trouverez comment intercepter un évènement.

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

Discussions similaires

  1. envoyer un message par outlook avec du html dans le corps
    Par zarbouine dans le forum API, COM et SDKs
    Réponses: 1
    Dernier message: 18/12/2009, 00h02
  2. Réponses: 6
    Dernier message: 09/12/2008, 14h29
  3. Gestion des messages envoyés avec une 2ème boite
    Par Cybher dans le forum Outlook
    Réponses: 1
    Dernier message: 09/10/2008, 10h30
  4. Réponses: 1
    Dernier message: 23/04/2008, 22h18
  5. envoyer mail avec VB6 sans message
    Par alexxx69 dans le forum VB 6 et antérieur
    Réponses: 4
    Dernier message: 20/11/2006, 15h33

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