ADOTable Фильтрация по дате (неделя и месяц)

@LSvetlana · Регистрация: 05.10.2019

Студворк — интернет-сервис помощи студентам

Hi

, подскажите как сделать фильтрацию по дате? есть две кнопки, на первой включается фильтр 1 неделя, на второй включается фильтр 1 месяц.
В таблице есть поле date типа Дата и время, на форму положила 2 компонента DateTimePicker.
Поля заполнены, дата в полях присутствует. Набрала следующий код:

Delphi
1
2
3
4
5
6
7
8
procedure TForm1.SpeedButton14Click(Sender: TObject);
begin
// за неделю
DateTimePicker1.Date:=now;
DateTimePicker2.Date:=now;
  ADOTable1.Filter := '[date]>=#'+DateToStr(DateTimePicker1.Date)+'# and [date]>#'+DateToStr(DateTimePicker2.Date-7)+'#';
  ADOTable1.Filtered := True;
end;

Получаю ошибку при фильтрации: Could not convert variant of type (Null) into type (OleStr).

@D1973 · 17.02.2025, 09:37

SeGun, тому пользователю, к которому Вы обращаетесь, уже 5 лет ничего не надо - это Volhv некрофилией увлекается.

@SeGun · 17.02.2025, 09:51

Сообщение от D1973

SeGun, тому пользователю, к которому Вы обращаетесь, уже 5 лет ничего не надо - это Volhv некрофилией увлекается.

А я на дату и не посмотрел ...

@Volhv · 17.02.2025, 14:32

D1973, northener, Спасибо!

Новые блоги и статьи Все статьи Все блоги /
Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@D1973 Модератор 9957 / 6493 / 2461 Регистрация: 21.01.2014 Сообщений: 27,501 Записей в блоге: 3
	17.02.2025, 09:37
	SeGun, тому пользователю, к которому Вы обращаетесь, уже 5 лет ничего не надо - это Volhv некрофилией увлекается. 0

@Volhv 5 / 0 / 0 Регистрация: 15.11.2012 Сообщений: 265
	17.02.2025, 14:32
	D1973, northener, Спасибо! 0