ADOTable: сумма

[tema654]

AdoConnection,adotable,datasource,d bgrid.
есть таблица. в ней есть поля: сумма, оплата_с_числа, оплата_до_числа.
так вот. сумма например 200 р. а оплатили с 14 по 18.
должно в сумме полуится 800р.
как мне посчитать все это дело, и вывести в лейбл например. ?
Спасибо!

[Аватар]

Начал бы с того, что пользовался бы не ADOTabe, а ADOQuery и максимально расчеты перенес бы в запрос. Часть не удобных для запроса расчетов перенес бы в калькулируемые поля и считал бы в OnCalcField. Их можно сделать и в ADOTable. В вашем примере с 14 по 18 - 5 дней и, если 200р. в день, то в сумме должно получиться 1000, а не 800

[Mad_Cat]

function DaysBetween ( const ToDate, FromDate : TDateTime ) : Integer;

вернет вам количество дней между оплата_с_числа, оплата_до_числа
--> кол-во дней умноженное на сумма и даст искомое ---> рез-т вывести в лейбл это не проблема