Bonjour,
j'ai ce bout de code
et je n'arrive pas à mettre la couleur de fond issue de mon fichier dans la cellule repérée en rouge. (la ligne en bleu ne marche pas).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 for j:=1 to qt do begin seek(fich_cave,j);read(fich_cave,enregvin); Gril_visu.Cells[0,j-1]:=enregvin.vignoble; Gril_visu.Cells[1,j-1]:=enregvin.legende; gril_visu.Canvas.Brush.Color:=enregvin.leg_couleur; end;
Pour info je récupère bien les valeurs de mon fichier donc le problème se situe dans le code
si quelqu'un peut m'aider d'avance merci
Partager