OVH Cloud OVH Cloud

Evenement / message

3 réponses
Avatar
Jerome MARTIN
Bonjour à tous

Je voudrais créer un message et l'envoyer à une fenêtre.
je pense savoir faire cela mais comment le récupérer sur la fenêtre.
Faut il définir un nouvel évènement et comment fait on cela ?

Cela se fait facilement en CENTURA BUILDER pour ceux qui connaissent
mais je l'ai jamais fait sous vb.

Merci d'avance

grome

3 réponses

Avatar
Christian Hugoud - Xtrem7
Tu peux utiliser le SendMessage , dans la fenêtre de réception, il te
faut mettre en place un Sous-Classement pour intercepter le message.

Si tu es dans la même app, il serait plus judicieux d'appeler une
propriété de la fenêtre elle-même.

Christian


"Jerome MARTIN" a écrit dans le message de
news:3f6ffb7f$0$13269$
Bonjour à tous

Je voudrais créer un message et l'envoyer à une fenêtre.
je pense savoir faire cela mais comment le récupérer sur la fenêtre.
Faut il définir un nouvel évènement et comment fait on cela ?

Cela se fait facilement en CENTURA BUILDER pour ceux qui connaissent
mais je l'ai jamais fait sous vb.

Merci d'avance

grome




Avatar
DJM
Dans la fenêtre qui doit recevoir le message, tu crée une procédure publique
,
par exemple :
Public sub AfficherMessage (Msg$)
msgbox Msg$
End sub

Supposons que cette fenêtre s'appelle Form1

Dans une autre form, tu peut faire

Form1.AfficherMessage "Coucou"
Avatar
Jerome MARTIN
En fait les deux solutions que l'on me presente ici, je les ai déjà mis en
oeuvre. Mais je trouve cela assez lourd
surtout quand une fenêtre doit avoir un comportement différent en fonction
de la fenêtre appelante.
Tu te retrouve avec des select case dans tout les sens pour gérer les appels
et les traitement en sortie de fenêtre, qui doivent être lancés en fonction
de l'objet qui à créer la fenêtre.

Tant pis je vais faire avec.

merci quand même

jérome


"DJM" a écrit dans le message de news:
3f7068ab$0$31727$
Dans la fenêtre qui doit recevoir le message, tu crée une procédure


publique
,
par exemple :
Public sub AfficherMessage (Msg$)
msgbox Msg$
End sub

Supposons que cette fenêtre s'appelle Form1

Dans une autre form, tu peut faire

Form1.AfficherMessage "Coucou"