删除dbgrid选中的行，提示‘stu_adoq1.field 'cjid' not found'

Question

代码如下：
procedure Tcjgl_form.N2Click(Sender: TObject);
var
id:string;
begin
id:=trim(stu_adoq1.fieldbyname('cjid').AsString);
if messagedlg('确定要删除选中的考生成绩吗？',mtconfirmation,[mbyes,mbno],0)=mryes then
begin
with TADOQuery.Create(nil) do
begin
try
close;
connection:=main_form.ADOCon1;
sql.Clear;
sql.Add('delete from t_cjb where (cjid='''+id+''')');
ExecSQL;
finally
free;
end;
end;
end;
end;

Answer 1

stu_adoq1这个表中是否有cjid字段呢？