diff --git a/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas b/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
index d67cf01ed..b219032f5 100644
--- a/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
+++ b/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
@@ -2565,7 +2565,7 @@ begin
     while (ApptsExamined < FData[MapRow, -1]) and not Result do
     begin
       Test := FData[MapRow, MapCol];
-      if Test > 0 then
+      if Test <> 0 then
       begin
         Inc(ApptsExamined);
         if Test = NativeInt(Appt) then