State d'un StringGrid

Bonjour,

je suis en train de faire une application qui utilise un string grid, et j'aimerais que lorsque l'utilisateur place la souris sur l'une des case, ca colorie en bleu la ligne et la colonne.

Pour la ligne j'utilise:

Code:

---

1 2	if gdSelected in State then Canvas.Brush.Color := clGradientInactiveCaption

---

Ca fonctionne parfaitement, par contre, je ne vois pas comment faire pour colorer la colonne.

j'ai essayé de faire :

Code:

---

1 2	if (ACol = gMX) then Canvas.Brush.Color := clGradientInactiveCaption

---

Ca fonctionne au début, mais comme le rafraichissement est mauvais, ca devient du n'importe et ca colorie des cases au hasard.

Auriez-vous une solution pour colorier la ligne et la colonne en même temps ?

Merci d'avance :ccool:

je crois que StringGrid dispose d'une méthode OnDrawCell*** ou quelque chose du genre et c'est cette méthode qui est faite pour ces tâches.

Exactement :ccool:.

Tu n'as plus qu'à tester les ligne/colonne sélectionnée:

Code:

---

1 2 3 4 5

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin with TStringGrid(Sender) do if (Col = aCol) or (Row = aRow) then ... end;

---

Bien sûr au changement de cellule, tu devras Invalidate toute la grille. Sinon seules l'ancienne et la nouvelle cellule seront repeintes.