ClientDataSet的CustomConstrain的表达式的问题

我的程序需要检测数据输入的有效性
因此定义了ClientDataSet.CustomConstrain
由于都是字符型的数据,有给定的选项(有的用户希望自己输入这些选项,要不我就只让用户选不让用户输入了),所以填写了类似下面的条件:
ClientDataSet.CustomConstrain为:(x='农业')or(x='非农业')//户口选项
ClientDataSet.ConstrainErrorMessage为:户口选项错误
我在运行期和设计期分别尝试过设置,但是都出现了同样的问题:
1 它的比较机制好像有问题: '农'或者'非' 也会被接受成为有效的输入,似乎只要是表达式里面包涵的都有效,而且 '' (空输入)也有效.
2 在运行期赋值时,显示的出错信息好像会错位,这个字段出错,出错信息却是其他字段的.我反复检查过了不是赋值的问题.(如果在设计期赋值没有这个问题)
我快要疯了,怎么会这样!!我从来都相信Delphi是最好的,怎么会这样.
希望各位大侠Save Me!!!