紧急呀!一个有关dbgrid的问题 如何在dbgrid刷新后将光标定位在原来那条记录上。(注意:此时数据集中的数据已经有所增减) 各位高手帮帮忙呀! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 把它的关键字值记下来刷新后再用locate定位就可以了只有这个办法 使用函数 GetBookMark, 具体可以查阅DELPHI 的HELP。 假设DBGrid的数据源是ADOTable1,ADOTable1中有个字段是‘编号’。var CurID:stringbegin CurID:=ADOTable1['编号'];//取得当前记录的编号 ...//数据库增减操作 ADOTable1.Locate('编号',CurID,[]);//定位到增减之前的位置end; 在刷新前将 j:=table1.RecNo;在刷新后 table1.First; table1.MoveBy(j-1); TbookMarkvari:tbookMark首行定位在这一行记录with query1 dobegini:=getbook;记录位置refreshgotobook(i)//回到原来的记录FreeBookMark(i)end; 两关实时更新的问题 怎么把IE嵌入到应用程序中呀? 高分求购酒店管理系统毕业设计论文 TForm的Create都参数重载问题 如何开通windows ftp服务? 滚动条 谁知道哪里可以下载delphi6的补丁?谢谢 校验码(crc32) 没有手机,怎样通过互联网给别人的手机发短信?当然最好不要太费事的,免费就更好了 哪里有Delphi6的电子书下载,我要学习网络控件啊!! 我装完delphi7后,要求注册,不注册就跳出了,该怎么解决? 请问一下:类实例的RTTI信息,可以知道该对象有什么公共方法吗?
刷新后再用locate定位就可以了
只有这个办法
begin
CurID:=ADOTable1['编号'];//取得当前记录的编号
...//数据库增减操作
ADOTable1.Locate('编号',CurID,[]);//定位到增减之前的位置
end;
在刷新后 table1.First;
table1.MoveBy(j-1);
var
i:tbookMark
首行定位在这一行记录
with query1 do
begin
i:=getbook;记录位置
refresh
gotobook(i)//回到原来的记录
FreeBookMark(i)
end;