Discussion :

[sky88]

comment on peux detecter un clique sur une cellule de stringgrid
merci à vous

[tourlourou]

avec les événements OnMouseDown/Up et en traduisant les coordonnées de la souris grâce à MouseToCell

ou avec l'événement OnSelectCell

[sky88]

mais moucetocell ne me donne pas la case dans un stringgrid?

[Cl@udius]

Salut

Bien sûr que si, MouseToCell renvoie la cellule sur laquelle tu as cliqué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  Column, Row: Integer;
begin
  StringGrid1.MouseToCell(X, Y, Column, Row);
  if (Column > -1) and (Row > -1) then
    StringGrid1.Cells[Column, Row] := Format('Col %d, Row %d', [Column, Row]);
end;

Et comme l'a précisé Tourlourou, tu peux également utiliser l'évènement OnSelectCell. Les paramètres ACol et ARow de la procédure te précisent la cellule que tu viens de sélectionner.

@+ Claudius