请教高手，如何取得鼠标所在单元格的列数或行数？[2条回复]

当前位置：首页

开发技术指南» 文章正文

引言：

·向各位朋友如何能快速提高写asp代码的水平 »显示摘要«

摘要：学习asp已经有一年多了，别人的代码基本都能看懂，就是自己动手时很困难，总听人说多动手才能提高，可是不知道怎么去做？请高人指点 ......

·acceptchange()和update()的区别 »显示摘要«

摘要： acceptchange()和update()的区别？ ......

求助还是StringGrid

请教高手，如何取得鼠标所在单元格的列数或行数？

NO.1 作者： sysu

procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton; 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;

NO.2 作者： boz

procedure TForm1.StringGrid1Mousemove(Sender: TObject;
　Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
　GC: TGridCoord;
begin
　GC := StringGrid1.MouseCoord(X, Y);
　// GC.X 即鼠标所选择的行中的列号。
　Caption := Format(%d %d, [GC.X, GC.Y]);
end;

·网络和多线程问题： »显示摘要«

摘要：当我添加多线程之后，网络数据丢失？那位高手能帮帮忙？在此多谢各位！ ......

» 本期热门文章：