请教在STRINGGRID中如何让鼠标移到某行该行便反选？

Question

请教在STRINGGRID中如何让鼠标移到某行该行便反选？

Answer 1

但如何反色呢？就是处于被选择的状态。
mousemove事件只能返回鼠标的X，Y值，但不能返回ROW和COL值，
如何才能知道当前的X，Y值位于哪个ROW内呢？

Answer 2

你看看这个效果，然后改改就可以了
procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
var
  Column, Row: Longint;
begin
  StringGrid1.MouseToCell(X, Y, Column, Row);
  StringGrid1.Cells[Column, Row] := 'Col ' + IntToStr(Column) +
    ',Row ' + IntToStr(Row);end;