我想指定

LinkControlToDate.CustomFormat := 'IfThen(%s=0, '''', FormatDateTime(''ddddd'', %s))'


CustomFormat的属性TLinkControlToField用于处理0个日期值。

但这会产生一个EConvertError


'没有格式'IfThen(%s = 0,'',FormatDateTime''的参数


CustomFormat是否不能在函数内部使用函数?

最佳答案

您使用参数%s两次,但只有一个参数。

尝试

LinkControlToDate.CustomFormat := 'IfThen(%s=0, '''', FormatDateTime(''ddddd'', %:0s))'


对第二个%s使用索引说明符。

07-26 09:37