时间比较出错，if CompareDate(MLBArray[K].TimeRec,TimeLRU)=-1 then，大家帮看看

Question

对应这条语句Error:
if CompareDate(MLBArray[K].TimeRec,TimeLRU)=-1 then
其中MLBArray[K].TimeRec,TimeLRU均以声明为TDateTimeToStr
大家帮看看，谢谢！

Answer 1

Error信息：
Project Cache.exe raised exception class EInvalidOp with message 'Invalid floating point operation'. Process stopped. Use Step or Run to continue.

Answer 2

Invalid floating point operation <-----
不合法的浮点操作if 语句之后应该是一个boolean变量 
所以办法就是：
if (CompareDate(MLBArray[K].TimeRec,TimeLRU)=-1) then
加个括号就可以了....

Answer 3

MLBArray[K].TimeRec,
TimeLRU这两个是什么东东？用date没问题

Answer 4

showmessage(vartostr(CompareDate(date,date+1)))