|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
18.05.2014, 19:02 | #1 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
Фильтрация в DBGrid по дате кликом на MonthCalendar
Здравствуйте, знатоки Delphi. Я начинающий программист и не сталкивался с этим раньше. Есть форма, на которой расположены DBGrid (DBGridEh) и MonthCalendar. Мне нужно как-то сделать так, чтобы кликом по дате в календаре в таблице оставались только записи, содержащие именно эту дату, ну и остальные записи соответствующие этой дате (дата, время, врач, фио пациента, процедура). Не подскажите как это осуществить, а то пока ничего толкового в инете найти не могу?
|
18.05.2014, 19:10 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Table или Query используешь? Какая СУБД?
I'm learning to live...
|
18.05.2014, 19:16 | #3 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
СУБД - Microsoft SQL Server. Для связи с ним использую ADOConnection, ADOTable, DataSourсe. Разместил их на Data Module.
Последний раз редактировалось Corvus046; 18.05.2014 в 19:20. |
18.05.2014, 19:49 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ага, ясно. Тогда наверное приемлемее будет описать событие OnFilterRecord для ADOTable примерно так:
Код:
Код:
I'm learning to live...
|
18.05.2014, 19:57 | #5 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
Так событие OnFilterRecord описать в ADOTable или в SQLQuery, как у вас? Просто у меня SQLQuery так-то нет в проекте. Или вы предлагаете мне SQLQuery тоже поместить на форму и связать его через событие DataSource к компоненту DataSource1, где будут находиться все данные с датами и т.п.? Хотя в SQLQuery я вообще не вижу такого события, но удивился, почему у вас в названии процедуры он упоминается
Последний раз редактировалось Corvus046; 18.05.2014 в 20:00. |
18.05.2014, 20:23 | #6 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
Я попробовал как вы посоветовали и написал так:
procedure TZayavki.ADOTable1FilterRecord(Data Set: TDataSet; var Accept: Boolean); begin Accept:=DataSet.FieldByName('Data') .AsDateTime=MonthCalendar1.Date; end; procedure TZayavki.MonthCalendar1Click(Sender : TObject); begin ADOTable1.Filtered:=False; ADOTable1.Filtered:=True; Но потом, при клику по календарю выскакивает такая ошибка: Project raised exception class EConvertError with messege "2014-05-21' is not a valid date and time'. |
18.05.2014, 20:34 | #7 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Поле Data небось символьного типа?
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
18.05.2014, 20:40 | #8 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
|
18.05.2014, 20:48 | #9 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
А сделать его datetime есть возможность?
По-моему как widestring такие поля в дельфи передаются и его нужно правильно в datetime сконвертировать. Лучше сделать в базе datetime
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Последний раз редактировалось Аватар; 18.05.2014 в 20:57. |
18.05.2014, 21:09 | #10 |
Пользователь
Регистрация: 18.05.2014
Сообщений: 14
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
фильтрация по дате | delfin07 | C++ Builder | 0 | 04.06.2012 09:34 |
Фильтрация по дате в запросе | Santosh | Microsoft Office Access | 1 | 18.08.2010 01:04 |
как соеденить DBGrid and MonthCalendar? | Милана666 | БД в Delphi | 24 | 20.05.2010 01:36 |
фильтрация по текущей дате | ahvahsky2008 | БД в Delphi | 5 | 04.05.2010 05:30 |