stringgrid??在线关注?? 我想在stringgrid写个事件,当我按回车键时,焦点从同一行的前一个列,走到后一个列,这个代码怎么写呀??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 加载edit属性,不就是当按回车键的时候进入edit状态么?你的意思是要进入edit状态的同时,“焦点从同一行的前一个列,走到后一个列”么?我不是很清楚在用户按回车的时候,楼主要完成什么样的操作。 procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);var i:integer;begin i:=StringGrid1.col; if key=#13 then inc(i); if (i>StringGrid1.ColCount-1) then i:=1; StringGrid1.Col:=i;end; 我告诉你个简单的办法,stringgrid的option中有一项是gotabs,你将它设置为真,然后在keydown中设置如果用户按了enter键,将其转化为tab键就可以了 简单问题 如何得到文件的后缀名???? 如何实现查询(实时更新并将结果更新)急!!!分数不够可在加。 如何把应用程序的快捷方式放入‘开始’-‘启动’里? 关于ADO数据库的小问题!!! 请问:access中双精度型数据的最大值是多少? 如何重起一个系统服务 怎样在delphi里面新建一个excel表? 显示数据分组统计 SOS SOS SOS SOS,救救我吧! shelllistview中禁止重命名和双击事件问题! 如何拷贝一个文件并更名?
var i:integer;
begin
i:=StringGrid1.col;
if key=#13 then inc(i);
if (i>StringGrid1.ColCount-1) then i:=1;
StringGrid1.Col:=i;
end;