Как работать с полем Date?

← →
delphino (2007-06-07 11:19) [0]

в таблице paradox есть поле типа Date. Как присвоить переменной значение этого поля но с месяцем уменьшенным на единицу, то есть если в таблице 15.07.2007, то пер=15.06.2007

← →
ЮЮ © (2007-06-07 11:26) [1]

см. EncodeDate, DecodeDate
И не забудь задаться вопросом, чему должен быть равен "на месяц раньше" для 31.03.2007, 30.03.07 и 29.03.07

← →
delphino (2007-06-07 11:27) [2]

> И не забудь задаться вопросом, чему должен быть равен "на
> месяц раньше" для 31.03.2007, 30.03.07 и 29.03.07

Спасибо за совет. не подумала

← →
delphino (2007-06-08 09:43) [3]

Как задать условие фильтра по полю Date, чтобы остались записи за последнюю неделю?
Present:=Now;
DecodeDate(Present,Year,Month,Day)
datasource1.dataset:=query1;
Query1.Filter:="R_Date="+?????;
Query1.Filtered:=True;

← →
Sergey13 © (2007-06-08 09:45) [4]

> [3] delphino (08.06.07 09:43)

А почему бы прямо в запросе не отсекать лишнее?

← →
Loginov Dmitry © (2007-06-08 10:01) [5]

Query1.Filter := Format("R_Date > %s", [QuotedStr(FormatDateTime("dd.mm.yyyy hh:nn:ss", Now - 7))]);

← →
Loginov Dmitry © (2007-06-08 10:02) [6]

Тока здесь за последние 7 дней ))

← →
delphino (2007-06-08 10:17) [7]

> Query1.Filter := Format("R_Date > %s", [QuotedStr(FormatDateTime("dd.
> mm.yyyy hh:nn:ss", Now - 7))]);

Ошибку выдает: 01.06.2007 17:15:42 is not a valid date...

← →
Loginov Dmitry © (2007-06-08 10:40) [8]

А если убрать " hh:nn:ss" ?

← →
Desdechado © (2007-06-08 11:56) [9]

Может, проще отнимать 30 дней?

← →
delphino (2007-06-09 07:23) [10]

> Query1.Filter := Format("R_Date > %s", [QuotedStr(FormatDateTime("dd.
>
> > mm.yyyy hh:nn:ss", Now - 7))]);
>
> Ошибку выдает: 01.06.2007 17:15:42 is not a valid date..
> .

Может это из-за маски?

← →
ЮЮ © (2007-06-09 08:45) [11]

> Может это из-за маски?

За сутки только на вопрос решилась? Если [8] не помогает, то это время можно было и по исходникам выяснить какой формат приемлем и методом тыка подобрать.

З.Ы. Ты здесь единственный специалист по TTable.Filter :) Ну не используют большинство ни TTable, ни Filter ...

← →
delphino (2007-06-10 17:51) [12]

> Ты здесь единственный специалист по TTable.Filter :) Ну
> не используют большинство ни TTable, ни Filter ...

А что же используют такие как ТЫ "СПЕЦИАЛИСТЫ"?

← →
Правильный Вася (2007-06-10 18:01) [13]

SQL
WHERE

> З.Ы. Ты здесь единственный специалист по TTable.Filter :
> ) Ну не используют большинство ни TTable, ни Filter ...

А кстати. Очень интересовал вопрос, но открывать ради такого ветку не хотелось.

Будут ли эквивалентны записи?
Корретно ли использовать второй вариант?
И что самое главное при втором варианте записи
в клиентский датасет будут передаваться все записи с последующей фильтрацией
или они будут отфильтрованы на сервере ?
ADODataSet1.SQL.Text:= " select Table1.* from Table1 where Table1.Somefield=SomeVariable "; ADODataSet1.open; //---------------------------- ADODataSet1.Filter:=Something; ADODataSet1.SQL.Text:= " select Table1.* from Table1 "; ADODataSet1.open;

← →
delphino (2007-06-11 04:23) [15]

> А если убрать " hh:nn:ss" ?

Все работает! Тему можно закрывать

> И что самое главное при втором варианте записив клиентский
> датасет будут передаваться все записи с последующей фильтрациейили
> они будут отфильтрованы на сервере ?
Откуда сервер знает о том, что в каком-то клиентском компоненте ты установил какое-то свойство? Он вернет то, что ты попросил. А попросил ты все поля всех записей таблицы. Собственно, можно было не стесняться и попробовать самому.

> Откуда сервер знает о том, что в каком-то клиентском компоненте
> ты установил какое-то свойство?

А кто его знает, что в ADO вшито.
Я слышал, что ADO вообще только через SQL работает с СУБД
Вдруг условие фильтрации добавляется в текст запроса.

> Собственно, можно было не стесняться и попробовать самому.

Как именно попробовать?

Поймать посылаемый серверу SQL

> Поймать посылаемый серверу SQL

;)) Все так просто ??
Ясно, спасибо.

Как работать с полем Date? Найти похожие ветки