procedure TForm2.ADOQuery1TestFieldValidate(Sender: TField);begin// Sender就是当前字段,可以在这里对Sender字段进行各种操作。// 例如:if Sender.Value = 'Hello' then Sender.Value := 'yeah~';//但如果想改变Sender字段的值,建议在OnSetText里面处理。end;