Source position: flcDateTime.pas line 247
function DiffMonths(
const D1: TDateTime;
const D2: TDateTime
):Integer;