Samlign af to datoer/måneder

Jeg har brug for en måde at skulle udføre nogle rutiner når der gået 1 måneder og når der gået 2 måneder.

Har rodet med MonthsBetween, men jeg synes ikke at den gør det jeg troede den skulle. Jeg havde opfattelsen at hvis det var sådanne her:

        case monthsbetween(Date,query1.FieldByName('DateOfRetire').AsDateTime) of
          0 : begin
                ShowMessage('0 måneder er gået');
          end;
          1 : begin
                ShowMessage('1 måned er gået');
          end;
          2 : begin
                ShowMessage('2 måneder er gået');
          end;
        end;

Men sådan er det ikke lige. Den beregner at 1 måned = 30.4375. Men de rutiner jeg skal udføre kan ikke gøres før det er den 31 og 62 dag.

Så hvordan kan man klare den?