J'ai développé une petite application Access qui permet d'inscrire des
joueurs de golf à des tournois.
L'inscription se fait au moyen d'un sous-formulaire, en mode continu, qui
permet l'affichage, l'ajout et la mise à jour des enregistrements(les
tournois auxquels le joueur est inscrit).Pour chaque tournoi, il y a le nom
du tournoi(obtenu à partir d'une liste défilante) et le partenaire, s'il y a
lieu.
Lorsque j'inscris un joueur à un tournoi avec partenaire, je veux que la
propriété BackColor du contrôle "partenaire" pour ce tournoi, et seulement
pour ce tournoi, prenne la couleur rose.
À cet effet, j'ai écrit la petite procédure Property Let suivante:
Public Property Let EnRose(Couleur)
Dim ActCtl As Control
Set ActCtl = Screen.ActiveControl
ActCtl.BackColor = Couleur
End Property
Cette procédure est appelée à partir d'une procédure événementielle
After_Update de la liste défilante permettant de choisir le tournoi auquel
s'inscrit le joueur, et cela au moyen des intructions suivantes:
DoCmd.GoToControl "Partenaire"
EnRose = "13408767"
Ça fonctionne bien, même trop bien!
En effet, non seulement le contrôle "partenaire" du tournoi en cours d'ajout
se colore en rose, mais aussi les contrôles "partenaire" des autres tournois
auquels est inscrit le joueur et qui sont affichés à ce moment là.
Ma question:
Comment faire en sorte que seul le contrôle "partenaire" de l'enregistrement
en court d'ajout soit affecté?
Toute suggestion acceptée...
Merci d'avance,
Raspoutine
