Delphi 读取dbgrid中的选中一行的代码及定位函数

假设你的dbgrid是dbgrd1：
dbgrd1.SelectedRows.Items[i]；

//selectedRows就是你选中的行
//items[i]就是选中行的第i列的值（string类型的）



定位函数

query1.locate('yourfield','要定位的值',[])

s1:=query1.fieldbyname('szm').AsString;
  tbl_xdcf.Locate('XDCFBH',s1, [loPartialKey]);

数据集名.Locate(字段名,关键值，[loPartialKey]);定位函数