删除问题???各位帮帮忙,在线等待....... 删除dbgrid中的某条记录以后,用requery刷新,怎样使光标停留在已删除记录的上一条获下一条上? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1.用BookMark:删前先使一个BookMark定位其前或其后一条记录上,Requery后再GotoBookMark;2.用Locate:删前先取其前或其后一Key值,Requery后再Locate定位过去。 也许有点帮助procedure TForm1.Button2Click(Sender: TObject);var b:TBook;begin with dbgrid1.DataSource.DataSet do begin b:=GetBook; next; gotobook(b); end;end; 就是这样。如果要避免指针移动时影响屏幕显示,还可以用dataset.disablecontrols和enablecontrols 判断一下再移动指针:if not EOF then NEXT; 如何实现树型结构(ado+sql+treeview) delphi如何使用导入类型库 如何给报表加上页脚>? 在使用Form.refresh时,该Form总是免不了地闪烁几下,可是使用Form.doubleBuffer时好像感觉有问题 请教一个有关数据库的问题 网络上一个简单问题 如何用delphi的 ADO技术自动创建对.dbf文件的连接。 delphi6老是不能安装? 请问如何在程序里控制鼠标的移动(象钱龙那样)??? PackTable DBF表的问题! 求解:Win98系统中有时在DBGRID中使用不了中文输入法,有没有什么方法可以解决。 大哥,帮我一把吧
2.用Locate:删前先取其前或其后一Key值,Requery后再Locate定位过去。
procedure TForm1.Button2Click(Sender: TObject);
var b:TBook;
begin
with dbgrid1.DataSource.DataSet do
begin
b:=GetBook;
next;
gotobook(b);
end;
end;
如果要避免指针移动时影响屏幕显示,还可以用dataset.disablecontrols和enablecontrols