你的命题有问题，你要的是相差的“几年几月几日”是没有意义的，因为有闰年问题，每个月的天数也是不一样的，所以没有所谓的“几年几月几日”差值的，只有两个日期之间相差多少天的问题
如果需要计算两个日期相差多少天，只需要把 TDateTime 类型转成 Double 类型再取整再相减。