Количество дней между двумя датами II

Для DateDiff:

Вы смотрели на функцию DecodeDate? Это не точно именно то, что вам нужно, но на ее основе можно сделать вашу функцию именно с нужной вам функциональностью.

Для величины Present:

function PresentValue(const cashflows : array of double; { отсортированные
транзакции, начальный индекс - cashflows[0] }
n : integer; { количество транзакций в массиве } rate : double; { оценочный процент за истекший период } atbegin : boolean) : double; { true, если транзакция была в начале периода, false если в конце }
var

i : integer; factor : double; begin
factor := (1 + rate / 100.0); result := 0; for i := n - 1 downto 0 do result := (result + cashflows[n]) / factor; if atbegin then result := result * factor; end;

[001404]

Содержание раздела