Как через компонет DateTimePicker сделаь поиск по дате в программме БД?

@Saren · Регистрация: 20.02.2014

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

Здравствуйте.

Мне нужно чтобы пользователь через Edit ввел дату и в компоненте DBGrid отображалось лишь те значения которые принадлежать этой дате.
Я выложу программу.
Спасибо. Жду результатов.

@Sergio Leone · 13.06.2014, 20:00

Saren,
1)

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

Как через компонет DateTimePicker сделаь поиск

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

тобы пользователь через Edit ввел дату

Вы ещё не определились? Тогда не берите Edit, он не для этого, однозначно берите TDateTimePciker, он для выбора даты как раз и создан!

2) всё бы хорошо, но я не нашёл у Вас подходящего места, где Вы хотите выбрать подходящие записи!
в общем случае, делается запрос с параметром.
но как это сделать у Вас - не подскажу, ибо надо знать вашу структуру (ну, где у Вас хранится требуемая дата)

@Saren · 13.06.2014, 20:18 **[ТС]**

Дата храниться в базе данных MS Access в таблице с названием "Tab2"

@Sergio Leone · 13.06.2014, 22:24

посмотрите, я добавил новую форму (unit4 == Form4) в ваш проект.
А вот исходники нового проекта полностью
SheduleProject.rar (за исключение БД, я её не стал вкладывать в архив).
Разумеется, прежде чем распаковать архив, сделайте резервную копию своих исходников, чтобы не потерять свои изменения (если Вы их делали, конечно!

@Saren · 14.06.2014, 18:45 **[ТС]**

А я не понял как поиск по дате работает. Как работает поиск? Мне нужно чтобы выбрали дату и показывал данные по этой дате и все спасибо большое.

@Sergio Leone · 14.06.2014, 22:04

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

А я не понял как поиск по дате работает. Как работает поиск?

на форме Form4 в ADOQuery1 записан текст запроса с параметром:

SQL
1
'select * from Tab2 where Int([Date]) = :paramDatePick '

и на кнопке по клику btRefreshClick дата из датапикера передаётся в запрос как параметр

Delphi
1
2
3
4
5
6
7
8
procedure TForm4.btRefreshClick(Sender: TObject);
var dt : TDateTime;
begin
 ADOQuery1.Close;
 dt := Trunc(DateTimePicker1.Date);
 ADOQuery1.Parameters.ParamByName('paramDatePick').Value := dt;
 ADOQuery1.Open;
end;

вот и всё.

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

Мне нужно чтобы выбрали дату и показывал данные по этой дате и все

ну так и есть!

@Saren · 15.06.2014, 14:39 **[ТС]**

А у меня не получается сделать так и не показывает в таблице информацию при выборе дате.

Добавлено через 1 минуту
Пустая таблица сделал как ты все сказал. А имя кнопки обязательно изменять как у тебя?

@Sergio Leone · 15.06.2014, 14:58

стоп. давайте по порядку:
1) Ты мой проект распаковал/запустил/попробовал? В моём проекте на форме 4 отбор данных работает или нет?!
2) если ты внес изменения в свой проект и что-то не работает, то ты сравнивнил, что в моём проект, а что - в твоём?! Если проект ведут себя по разному, значит, чем-то они отличаются (ваш кэп!

)

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

А имя кнопки обязательно изменять как у тебя?

нет. имя кнопки индифферентно, оно ни на что не влияет!

p.s. думаю, что тебе лучше исходники проекта с внесёнными изменениями выложить, проще будет посмотреть, что не так.

@Saren · 15.06.2014, 16:42 **[ТС]**

Что я сделал с проектом следующее:

- на Form3 добавил компонент adoquery2 в нем я написал твой код SQL... и в DataSource1 в свойстве выбрал adoquery2.(после этого у меня не показывает данные в таблицу которые были занесены.)

- код программы написан на кнопке Button3.

-можешь посмотреть как я делал экспорт в Excel (сам сделал).

Проблема ещё в том что когда я хочу добавить запись выдает ошибку я не могу понять почему.

Спасибо огромное за помощь. Выручаешь очень сильно. Я пишу дипломный проект.

@Saren · 15.06.2014, 16:43 **[ТС]**

Да я запускал проект твой но нет данных в таблице.

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

@Saren 0 / 0 / 0 Регистрация: 20.02.2014 Сообщений: 85
	13.06.2014, 20:18 [ТС]
	Дата храниться в базе данных MS Access в таблице с названием "Tab2" 0

@Sergio Leone 2511 / 1132 / 582 Регистрация: 07.06.2014 Сообщений: 3,286
	13.06.2014, 22:24
	посмотрите, я добавил новую форму (unit4 == Form4) в ваш проект. А вот исходники нового проекта полностью SheduleProject.rar (за исключение БД, я её не стал вкладывать в архив). Разумеется, прежде чем распаковать архив, сделайте резервную копию своих исходников, чтобы не потерять свои изменения (если Вы их делали, конечно! 1

@Saren 0 / 0 / 0 Регистрация: 20.02.2014 Сообщений: 85
	14.06.2014, 18:45 [ТС]
	А я не понял как поиск по дате работает. Как работает поиск? Мне нужно чтобы выбрали дату и показывал данные по этой дате и все спасибо большое. 0

@Saren 0 / 0 / 0 Регистрация: 20.02.2014 Сообщений: 85
	15.06.2014, 14:39 [ТС]
	А у меня не получается сделать так и не показывает в таблице информацию при выборе дате. Добавлено через 1 минуту Пустая таблица сделал как ты все сказал. А имя кнопки обязательно изменять как у тебя? 0

@Saren 0 / 0 / 0 Регистрация: 20.02.2014 Сообщений: 85
	15.06.2014, 16:43 [ТС]
	Да я запускал проект твой но нет данных в таблице. 0

Как через компонет DateTimePicker сделаь поиск по дате в программме БД?

Решение