Colorier une cellule d'un grid [Résolu]

Signaler
Messages postés
98
Date d'inscription
jeudi 1 avril 2004
Statut
Membre
Dernière intervention
22 mai 2008
-
Messages postés
98
Date d'inscription
jeudi 1 avril 2004
Statut
Membre
Dernière intervention
22 mai 2008
-
Bonjour,
J'aurai souhaiter savoir comment il faut que je fasse pour que lorsque je clique dans une cellule d'un Grid celle ci change de couleur.
Je pense qu'il faut que j'utilise l'événement OnDrawCell, mais je n'arrive pas a comprendre comment le faire marcher pour une cellule lors d'un clique.
Pour l'instant je fais : listeeleve.Canvas.Brush.Color := clred;
listeeleve.Canvas.FillRect(Rect);
Je ne sais vraiment pas comment faire sourtout qu'il faut que je puisse colorer une autre cellule si j'en ai envie sans que l'autre ne redevienne blanche.
Merci à tous ceux qui aurait une idée à proposer.
Bisous et bonne prog.

La puce

2 réponses

Messages postés
1418
Date d'inscription
samedi 12 juin 2004
Statut
Membre
Dernière intervention
5 juillet 2010
9
Utilise le code suivant dans l'événement OnDrawCell de ta Grid :



with (Sender as TStringGrid).Canvas do

if (gdSelected in state) then begin

brush.color:= clRed;

FillRect(rect);

Font.color:=clwhite;

TextOut(rect.left+3,rect.top+2,(Sender as TStringGrid).Cells[ACol,ARow]);

end else begin

brush.color: =clWhite;

FillRect(rect);

Font.color:= clWindowText;

TextOut(rect.left+3,rect.top+2,(Sender as TStringGrid).Cells[ACol,ARow]);

end;


@+

Nico { http://www.ni69.new.fr/ }




<hr size ="2" width="100%">

N'oubliez pas de cliquer sur Réponse Acceptée lorsque la réponse vous convient !
Messages postés
98
Date d'inscription
jeudi 1 avril 2004
Statut
Membre
Dernière intervention
22 mai 2008
1
Merci, c'est génial sa va me permettre de me débloquer un peu.

La puce