TDataSet* ds = DBGrid1->DataSource->DataSet;
int count = DBGrid1->SelectedRows->Count;
for(int i=0;i<count;i++)
{
ds->GotoBookmark((void*)DBGrid1->SelectedRows->Items[i].c_str());
ShowMessage(ds->Fields->FieldByName("xm")->AsString);
}