将字符串分配给dbgrid单元delphi7

Question

所以我有一个dbgrid用作数据条目。 假设我有4个字段需要由用户填写，另一个字段需要向其中分配值。看图片。

我通过数据源1将dbgrid连接到query1。 我的问题是，如何为idpay字段分配一个特定的值（ex：abc），以便无需用户输入即可读取它？ 由于dbgrid是自动发布的，因此我需要在事件beforepost上分配该值。知道怎么做吗？ 任何帮助深表感谢！谢谢！

Answer 1

您使用的查询组件是否具有AfterInsert事件？
如果是这样，那就干脆像这样

procedure TForm1.ClientDataSet1AfterInsert(DataSet: TDataSet);
begin
  DataSet.FieldByName('IDPAY').AsString := 'ABC';
end;