只要DBGRID中的数据是由adoquery1查询出来的，那鼠标点到哪一行adoquery1就会指向哪一行，所以只要：
　　　　G:=adoquery1.fieldbyname('项目').AsString;

with adoquery do
 begin
  sql.clear;
  sql.add('select * from hy_table');
  open;
 end;
procedure tform1.DBGrid1CellClick(Column: TColumn);
begin
 G:=adoquery1.fieldbyname('项目').AsString;
end;