procedure TForm1.ADOQuery1ddhValidate(Sender: TField);
begin
  if i=0 then
  begin
    i:=1;
    sender.AsString:='002';
  end;end;procedure TForm1.FormCreate(Sender: TObject);
begin
  i:=0;
end;procedure TForm1.FormShow(Sender: TObject);
begin
  ADOQuery1.Open;
end;
我想问下我第一次录ddh的值为001为什么程序执行后,ddh还是001不是002