Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [SQL|Delphi] Подсчёт кол-ва дней.

Автор: RAMPART 9.6.2007, 15:00

Доброго времени суток.
Вопрос такой: необходимо подсчитать количество дней между двумя датами: заданной датой в базе данных и текущей датой, при том заданная дата в БД может быть таковой: 01.01.1990 , и соответственно кол-во дней между ней и текущей датой также нужно будет узнать.
Это надо реализовать в Делфи, я собираюсь через ADOQuery(потому что мне потом необходимо будет поместить результат в QReport, если знаете как это сделать без ADO а затем поместить в Report, сообщите пожалуйста). Подскажите, каким должен быть запрос,чтобы выполнить данную задачу?

p.s. БД - oracle 10

Заранее спасибо.

Автор: comtat 9.6.2007, 20:23

Чтото типа в MySql

Код


SELECT Round((UNIX_TIMESTAMP(NOW())- UNIX_TIMESTAMP('2007-06-01'))/(24*60*60),0);

Принцип такой получаем разницу между текущей датой и датой из БД в UnixTime
потом считаем кол-во дней
Round для того, чтобы число было целым
вот пока все, что предумал ... smile

Автор: Rodman 9.6.2007, 23:22

можно расчитать и стандартными средствами Delphi

Код


ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('SELECT DataField FROM TableName;');
ADOQuery.Open;
Showmessage(IntToStr(DaysBetween(ADOQuery.Fields[1].AsDate,Now)));

а про QReport поищи на фуруме!!