Delphi 如何判断在DBGridEh中某格输入数据是否符合约束

两种方法：
1、如果要实现复杂的判断，可以用字段的OnValidate事件，写法如下：
procedure ClientDataSetValidate(
   Sender: TField);
var tpEvent:TFieldNotifyEvent;
begin
   if Sender.AsFloat > 57 then begin
     ShowMessage('值不符事要求了');
     tpEvent:=Sender.OnValidate;
     Sender.OnValidate:=Nil;
     Sender.Value:=值; //注意，如果要赋值，一定要先屏蔽原事件，否则会堆栈溢出
     Sender.OnValidate:=tpEvent;
     tpEvent:=Nil;
   end;
end;

方法二： 可以使用 DbGridEh的提供的功能，在每一列中，有
KeyList 与 PickList两个属性，其中KeyList用于限制输入的值，PickList用于显示选项，两者可以配合使用，或者是PickList单独使用。 配合使用时PickList的行数必须与KeyList一一对应，比如   PickList的值为  
星期一
星期二
星期三
KeyLsit的值为
1
2
3
则用户选择时看到的时星期一、二、三，但字段得到的值是1,2,3,其他值不允许，
配合NotInKeyListIndex属性，可以设定，万一用户输入了不在keyList中的值，字段的默认值。