Question

delphi 在DBGrid中选中多行数据后，如何得到选中行中某一列的数据！有例

Answer 1

procedure
GetSelectedRecord(DataSet
:
TDataSet;
FieldName
:
String;BookmarkList
:
TBookmarkList;
Strings
:
TStrings);//这个过程中的参数分别为：数据表、字段名称、书签、用来保存所选字段内容的//字符串（用于将内容传递到另一个单独窗体中的TLIST控件中）varI:
Integer;bm
:
TBookMark;beginStrings.Clear;with
Dataset
do
beginDisableControls;bm
GetBookMark;try//每个选择的记录都有一个书签标志，这就为处理它们提供了条件for
I
0
to
BookmarkList.Count
-
1
do
beginBookmark
BookmarkList
;Strings.Add(DataSet.FindField(fieldname).AsString);end;finallyGotoBookMark(bm);FreeBookMark(bm);EnableControls;end;end;end;调用举例：GetSelectedRecord(Table1,
'NAME',
DBGrid1.SelectedRows,
Form2.ListBox1.Items