Question

delphi怎样取出dbgrid单元格中的数据，放到设定的变量中

如设定变量为temp，指定单元格自己输入

Answer 1

选择dbgrid，到属性框中的events界面
你先试试,晚上给你测试。
temp:=DBGrid1.Fields[DBGrid1.SelectedIndex].DisplayText;
或
temp:=dbgrid1.SelectedRows.Items[DBGrid1.SelectedIndex];
showmessage(temp);

追问

我是根据行列名来确定单元格的，行列名自己输，没有具体的第几行第几列的。能取到该单元格的数据么？

追答

能取到的。
with dbgrid1.datasource.dataset do //或 with adoquery1 do (这里是你dbgrid连的表)
begin
recno :=你的行数。
temp:=DBGrid1.Fields[你的列数].DisplayText;
end;

追问

我输入的是行列名，如果转成行列数的话，就很复杂了。

追答

啊，列有列名，行也有名吗？如果行名是字段值，可以用locate定位
dbgrid1.datasource.dataset.locate('字段名',你的行名,[]); //格式应该是这样的，如果不对，查一下就是了。
列名的话，直接用表中的字段名更方便。

如果一定要用列名，就需要用列名去判断表的字段名，然后输出数据。
如果列不是很多，自己写几个IF语句，
for i:=0 to dbgrid1的列数-1 do begin
if trim(dbgrid1.Columns[i].Title.caption) =‘你输入的列名’ then begin
temp:=DBGrid1.Fields[i].DisplayText;
exit;
end;
end;

Answer 2

dbgrid中ondblclick 事件中写入下一代码
temp:=dbgrid.Fields[0].AsString;
0是第一列
1是第二列