Delphi中DBGrid1CellClick是干什么用的？？

Question

代码如下：procedure Tstockinfrm.DBGrid1CellClick(Column: TColumn);
begin
stockin_code.Text :=DBGrid1.Fields[0].AsString   ;
operator_code.Text :=DBGrid1.Fields[1].AsString    ;
pro_code.Text :=DBGrid1.Fields[3].AsString   ;
stockin_num.Text:=DBGrid1.Fields[4].AsString    ;
datetimepicker1.Date:=strtodate(DBGrid1.Fields[2].AsString  )  ;
place_code.Text :=DBGrid1.Fields[5].AsString  ;
deal_man.Text :=DBGrid1.Fields[6].AsString  ;
stockin_type.Text :=DBGrid1.Fields[7].AsString  ;
//warehouse_name :=DBGrid1.Fields[7].AsString  ;
end;这个是做什么用的？谢谢

Answer 1

点击dbgrid时，显示该行数据
PS:楼主你也太抠了！