Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Снова эти даты:( [D6, dBase, FoxPro]


Солер ©   (2003-06-14 08:48:00) 

Уважаемые Мастера!
Помогите начинающему
Снова нужна Ваша помощь

Как сделать запрос, чтобы отобрать в столбце с датами значения
меньше сегодняшней даты
Спасибо


Lucky   (2003-06-15 11:11:00) [1]

Я делаю так:
в TQuery пишу запрос, вроде следующего
select *
from table1
where ddate >= :bdate and ddate <= :edate

далее в коде
Query1.ParamByName("bdate").AsDate := DateTimePicker1.Date;
Query1.ParamByName("edate").AsDate := DateTimePicker2.Date;
Query1.Open;

и Все. Соответсвенно запрос можно модифицировать под свои нужды


Солер   (2003-06-14 14:39:00) [2]

Огромное спасибо!
Заработало.
Ещё раз благодарю за терпение к нам новичкам и обстоятельные ответы!!!!!!!!!!!


Anatoly Podgoretsky   (2003-06-14 12:30:00) [3]

Неужели так и написал Where itog < Date, здесь должно выть строковое выражение (в кавычках естественно)


sizmrebi   (2003-06-14 12:02:00) [4]


> Солер

v moiom primere nado bilo
a:=""""+DateToStr(Date())+"""".

zabil ukazat:))


alpine   (2003-06-14 11:14:00) [5]

попробуй так :
Procedure OpenQuery(Sender : Tobject);
var
a:String;
begin
a:="""+ DateToString(NOW)+"""; // если не получится с кавычками попробуй без них !
Query.Close;
Query.SQL.Clear;
Query.SQL.Add("Select * From Spisok Where itog <"+a);
Query.Open;
end;


Солер   (2003-06-14 10:45:00) [6]

К сожалению не работает
Пишет что-то про несовместимые значения


sizmrebi   (2003-06-14 09:32:00) [7]

Procedure OpenQuery(Sender : Tobject);
var
a:String;
begin
a:=""""+Date()+"""";
Query.Close;
Query.SQL.Clear;
Query.SQL.Add("Select * From Spisok Where itog <"+a);
Query.Open;
end;

U etogo primera est svoi nedostatki no budet rabotat:)))


Солер   (2003-06-14 09:06:00) [8]

Пишу в запросе
Select * From Spisok
Where itog < Date
Выдаёт ошибку.


Anatoly Podgoretsky   (2003-06-14 08:50:00) [9]

Использовать в WHERE отношение "<"


Наверх

Титульная страница Поиск, карта сайта Написать письмо