| Blog信息 |
|
blog名称:注册会计师（注会）练习软件
日志总数:398
评论数量:116
留言数量:27
访问次数:3265920
建立时间:2005年6月6日 |
| |
|
 [delpih编程]advstringgrid 的当前记录怎样取得
软件技术
吕向阳 发表于 2009/4/6 13:27:52 |
| stringgrid的当前记录取得是很方便的，而advstringgrid尽管在其它
方面功能强大，但要取当前记录还是要费一番周折。
网上没有相关的资料，只能自己摸索了。一番测试后，发现其有一个
selectcell事件，点击后发现其有内建参数，应是选定行的行与列数。
因此在此事件中加入一个全局变量 currentrecno,用来保存arow,代码
如下。
procedure Tfmsendmulti.ads2SelectCell(Sender: TObject; ACol,
ARow: Integer;
var CanSelect: Boolean);
begin
currentrecno := arow;
end;
在需要用到当前行号，列号的事件直接引用currentrecno即可。
如
procedure Tfmsendmulti.ads2DblClick(Sender: TObject);
var
XPAPERID: string;
begin
xpaperid := ads2.Cells[0, currentrec];
showmessage(xpaperid);
end; |
|
|
回复:advstringgrid 的当前记录怎样取得
软件技术
小桥流水(游客)发表评论于2010/1/5 21:29:49 |
| 用得着这样吗？直接用avdstringgrid.cells[advstringgrid.col,advstringgrid.row]不就行了 |
|
» 1 »
|