OVH Cloud OVH Cloud

Détection

2 réponses
Avatar
Alain TEYSSEDRE
Bonjour

J'ai mis la commande suivante sur l'évènement Form _ KeyDown

If Me.Dirty Then Me.CdeValider.Visible = True

L'objetif est d'afficher le bouton de Commande CdeValider dès que je rentre
dans un mode édition


Le problème c'est que mon bouton ne s'affiche qu'après avoir appuyé 2 fois
sur une touche du clavier !

si je met le code Me.CdeValider.Visible = True sur l'évènement Form_Dirty
rien ne s'affiche


Ou doit-je mettre mon code pour que mon bouton s'affiche dès que la 1ere
frappe de touche qui me mette en
mode edition dans mon formulaire ?

merci

Alain

2 réponses

Avatar
Xavier HUE
Bonjour Alain,

J'ai rencontré un problème similaire.
Si'lon test Me.Dirty, lors de l'exécution de l'évènement
OnDirty, le résultat renvoyé est False ??!!

La propriété Dirty du formulaire est mise à jour à la fin
de l'évènement OnDirty.

On le constate trés facilement en insérant la
ligne "MsgBox Me.Dirty" dans l'évènement.

Dans ton cas:
Me.CdeValider.Visible = True
dans l'évènement OnDirty suffit.

Si l'évènement déclenche c'est que tu es en modif.
Le test sur Me.Dirty est inutile à ce niveau.

Tu peux compléter en ajoutant dans l'évènement UnDo:
Me.CdeValider.Visible = False

Cordialement.
Avatar
Alain TEYSSEDRE
Bonjour Xavier

Je ne suis pas certain d'avoir bien compris ta suggestion.

Ce que je sais dans mon appli c'est que si je me contente de mettre

Me.CdeValider.Visible = True dans l'évènement : Form_Dirty mon bouton de
Commande ne s'affiche pas!



"Xavier HUE" a écrit dans le message de
news:0b6301c3a2b0$e4c1dd40$
Bonjour Alain,

J'ai rencontré un problème similaire.
Si'lon test Me.Dirty, lors de l'exécution de l'évènement
OnDirty, le résultat renvoyé est False ??!!

La propriété Dirty du formulaire est mise à jour à la fin
de l'évènement OnDirty.

On le constate trés facilement en insérant la
ligne "MsgBox Me.Dirty" dans l'évènement.

Dans ton cas:
Me.CdeValider.Visible = True
dans l'évènement OnDirty suffit.

Si l'évènement déclenche c'est que tu es en modif.
Le test sur Me.Dirty est inutile à ce niveau.

Tu peux compléter en ajoutant dans l'évènement UnDo:
Me.CdeValider.Visible = False

Cordialement.