stringgrid 的一些用法

  point: TPoint;

  Point := (sender as TStringGrid).ScreenToClient(GetMouseCursorPos);
  (sender as TStringGrid).MouseToCell(Point.x, Point.y, col, row);