本文整理自网络,侵删。
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 每年、月、周、日的开始与结束的时间startofayear … startoftheyear … endofayear … endoftheyear
Delphi windows 编程[20] - 改变菜单项并换行
更多相关阅读请进入《Delphi》频道 >>