本文整理自网络,侵删。
procedure TMainForm.UniButton2Click(Sender: TObject);
var iIdx:integer; bmbh:string;begin
for iIdx := 0 to UniDBGrid1.SelectedRows.Count - 1 do begin
UniDBGrid1.DataSource.DataSet.Bookmark := UniDBGrid1.SelectedRows[iIdx]; bmbh:= UniDBGrid1.DataSource.DataSet.FieldByName('nm').AsString;
end;
end;――――――――――――――――
原文链接:https://blog.csdn.net/ozhy111/article/details/87606614
相关阅读 >>
Delphi读取excel文件-统计全部工作表中内容相同单元格出现次数
Delphi 过滤网页代码 <script></script>
Delphi中webbrowser(或者embeddedwebbrowser)控件打开部分网站报“invalid floating point operation”异常的解决方法
Delphi环境下基于spcomm控件开发串口通讯报文字节丢失的问题解决
更多相关阅读请进入《Delphi》频道 >>