请教dbgrid的onkeypress问题。

Question

if dgrid1.selectfield.fieldname='field' Then

Answer 1

我实际使用，我这时助记码，性质完全一样procedure TForm_ajjbqkadd.DBGrid1KeyPress(Sender: TObject; var Key: Char);
var
  v_zjm:string;
begin
   if key=#13 then
   begin
   with query1 do
   begin
     close;
     sql.clear;
     sql.add('select * from t_pinz where zjm=:zjm');
     parambyname('zjm').asstring:=dm.q_ajmx.fieldbyname('pinz_id').asstring;
     open;
     dm.q_ajmx.fieldbyname('pinz_id').asstring:=fieldbyname('pinz_id').asstring;
     
   end;
   end;