[Пионер]

Я работаю с базами данных ADO, через компонент ADOTable вывожу таблицу «Мероприятия», там есть поля «Дата проведения» и «Время проведения». Вопрос: как сделать так чтобы при нажатии кнопки, дата и время сравнивались с текущем на компьютере и в ShowMessage выводилось ближайшее мероприятие.

[Ildar-tsr]

Я правильно понимаю, что должно выводиться дата ближайшего мероприятия, которое будет? Или прошедшие тоже нужно рассматривать?

[Пионер]

да, правельно!

[Страдалецъ]

Простейшее решение:

Код:

SELECT     TOP 1 EventDate, Message
FROM         Events
WHERE     (EventDate >= GETDATE())
ORDER BY EventDate

[Пионер]

Хотелось бы на делфи, а не SQL

[Kailon]

Сообщение от Пионер

Хотелось бы на делфи, а не SQL

А чем плох SQL? Ведь на нем проще всего сделать. А так придется пробегаться по всем записям таблицы "Мероприятия" в несколько этапов:

• сначала нужно будет в поле "Дата проведения" искать сегодняшнюю дату, а если таковой нет, то ближайшую или сразу выдавать сообщение, что мероприятий на сегодня нет;
• затем в найденных датах, которые еще нужно будет где-то хранить, нужно будет найти ближайшее время

[Страдалецъ]

Я работаю с базами данных ADO

Хотелось бы на делфи, а не SQL

И как сие тогда понимать?

[Ildar-tsr]

Вы чего ребята?
Он имеет в виду, что хочет готовый код на делфи, чтоб ему осталось только скопировать и вставить

[Пионер]

Сообщение от Ildar-tsr

Вы чего ребята?
Он имеет в виду, что хочет готовый код на делфи, чтоб ему осталось только скопировать и вставить

Кхм... я спрашивал как можно релизовать алгоритм такого поиска на делфи, а не в коем случае готовый код, SQL удобнее не спорю, но в тот момент мне им пользоваться не очень удобно было!

[Пионер]

Сообщение от Страдалецъ

Простейшее решение:

Код:

SELECT     TOP 1 EventDate, Message
FROM         Events
WHERE     (EventDate >= GETDATE())
ORDER BY EventDate

Делаю всё так, пишет "Неопределённая функция GETDATE выражение";
Как можно исправить?)

[Страдалецъ]

Я привел пример для подключения к Акцесу через ADO, у него такая функция есть, а вот какая в вашей БД я не в курсе. К какой БД подключаетесь?

[Пионер]

Сообщение от Страдалецъ

Я привел пример для подключения к Акцесу через ADO, у него такая функция есть, а вот какая в вашей БД я не в курсе. К какой БД подключаетесь?

как раз таки аксесс 2003

[Страдалецъ]

Мда? Или я уже запятовал на чем тестировал или лыжи не едут. Ну попробуйте Now() или Date()