Couleur de listbox

Bonjour,
J’ai un petit souci avec mes listbox, principalement le choix couleurs en mode interprété
les boutons de programmation fonctionnent parfaitement

//boutonsA color lignes impair
BackgroundColor:=Sélectionner couleur RVB(16777215)
OBJET FIXER COULEURS RVB(;“LBcontactListe”;0;BackgroundColor;AlternateBackgroundColor)
OBJET FIXER COULEURS RVB(
;“EvenColor”;0;BackgroundColor)
//boutonsB color lignes pair
AlternateBackgroundColor:=Sélectionner couleur RVB(16777215)
OBJET FIXER COULEURS RVB(;“LBcontactListe”;0;BackgroundColor;AlternateBackgroundColor)
OBJET FIXER COULEURS RVB(
;“OddColor”;0;AlternateBackgroundColor)

A la réouverture du formulaire le choix de couleur pffff !! Plus rien.
J’ai peut être oublié quelque chose mais quoi ???
Merci de votre précieuse aide

Ben…
tu en demandes trop : il n’y a pas de mémoire de tout cela : si tu fermes et re-ouvres le formulaire, il est normal de relancer le code.
Mais j’ai peut-être pas bien compris la question et t’ai (trop) pris pour un débutant ?

Oui, pour que ce soit enregistré, il faut choisir la couleur dans l’éditeur de formulaire.
Si c’est pour que l’utilisateur puisse choisir ses couleurs, il faut enregistrer son choix quelque part puis le réaffecter à chaque ouverture du formulaire.

Bonjour Stanislas
Tu as compris mon problème,
Et maintenant as tu la solution du script à insérer dans la méthode formulaire sur chargement ?
Merci
Oupssss
Bonjour Olivier.
Merci à toi aussi de ta contribution à mon problème
Amicalement

En admettant que tu aies au préalable charger tes couleurs dans les variables BackgroundColor et AlternateBackgroundColor, le code ressemble fort à celui que tu as donné.

J’ai juste introduit une petite subtilité que je te laisse découvrir. Elle permet de conserver la couleur d’avant-plan choisie dans l’éditeur.
<code 4D>
C_ENTIER LONG($foregroundColor)
OBJET LIRE COULEURS RVB(;“LBcontactListe”;$foregroundColor)
OBJET FIXER COULEURS RVB(
;“LBcontactListe”;$foregroundColor;BackgroundColor;AlternateBackgroundColor)
</code 4D>

FORMIDABLE,

Merci Stanislas, tu m’a donner l’exacte solution.
Mille Mercis

Bonne journée

Re bonjour Stanislas,

Aurais tu la petite méthode pour la grille de la listbox ?
Je sais , j’abuse mais c’est tellement bien de demander ce que l’on ne sais pas faire

Voici mon code pour les couleurs de grille listbox
//Ligne Grille Horizontal
HorGridColor:=Sélectionner couleur RVB(16777215)
LISTBOX FIXER COULEUR GRILLE(;“LBContactListe”;HorGridColor;Vrai;Faux)
OBJET FIXER COULEURS RVB(
;“HorColor”;0;HorGridColor)

// Lignes grille Vertical
VertGridColor:=Sélectionner couleur RVB(16777215)
LISTBOX FIXER COULEUR GRILLE(;“LBContactListe”;VertGridColor;Faux;Vrai)
OBJET FIXER COULEURS RVB(
;“VertColor”;0;VertGridColor

Merci de ton retour

Oublié de clôturer
Bon week-end à tous

: Pascal DURFORT

Oublié de clôturer
Bon week-end à tous

Oui, j’allais justement te le dire :mrgreen: