point: TPoint;

 

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

posted on 2013-02-05 12:41  幻劫  阅读(232)  评论(0编辑  收藏  举报