Question

Delphi提取某个数据值 access数据库用dbgrid显示的

比如说我要把第三列第四行的数字8赋值给变量a

Answer 1

在DBGrid的Events的OnCellClick事件中写一下的代码：
procedure .DBGrid1CellClick(Column: TColumn);
var a:string;//定义变量a
begin
if ADOTable1.Active then
begin
a := ADOTable1.fieldbyname('分析结果').AsString;//获取选中行数据分析结果列的值，最好写分析结果英文名
end;
end;