我正在使用Delphi 7。 我使用组件tCxDateEdit, 在ValidationOptions中,我将evoRaiseException设为false evoshowErrorIcon是真的 当我在“31/02/2015”之类错误的日期时,我的日期组件旁边会出现一个图标,我有一条消息错误,例如“Date incorrecte” 有一种方法可以更改错误消息?
提前感谢。
答案 0 :(得分:4)
您可以像这样
修改控件的OnValidate事件中显示的文本procedure TForm1.cxDBDateEdit1PropertiesValidate(Sender: TObject;
var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean);
begin
ErrorText := DisplayValue + ' is not a valid date';
end;