Delphi unigrid记录check遍历

本文整理自网络，侵删。

 
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 2009 新增单元 character isletter、isupper、islower、isdigit、isnumber

Delphi中用拼音首字符序列来实现检索功能

Delphi windows 编程[7] - wm_create 消息

Delphi edit右键系统菜单加自定义菜单项

Delphi代码中嵌入asm代码

Delphi中一段可以判断网络连接的代码

Delphi 网上获取北京时间取字符串与字符串中间的字符

Delphi中判断是否是64位操作系统

Delphi tadodataset 加载数据到fdmemtable1

Delphi如何过xp的防火墙而不被拦截

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi unigrid记录check遍历