Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.87/23: Рейтинг темы: голосов - 23, средняя оценка - 4.87
1 / 1 / 0
Регистрация: 24.07.2011
Сообщений: 47
1

Фильтрация даних DBGrid и DateTimePicker

26.07.2011, 16:51. Показов 4793. Ответов 5
Метки нет (Все метки)

Вопрос.
Как сделать фильтрацию данных в Гриде. Есть колонка Дата куда прописываем дату.
И компонент DateTimePicker. Как сделать фильтр чтоб значение бралось с DateTimePicker.

Вот мой код

Delphi
1
2
3
4
5
6
7
procedure TForm1.Button4Click(Sender: TObject);
begin
Table1.Filtered:=True;
Edit1.text:=FormatDateTime('dd.mm.yyyy', Form1.DateTimePicker1.Date);
Table1.Filter:='DATA=' +  ??????;
Table1.Filtered:=False;
end;
что нада ставить вместо ??????
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.07.2011, 16:51
Ответы с готовыми решениями:

Фильтрация: вывести в DbGrid только данные с подходящими датами (интервал задается через Datetimepicker-ы)
Здравствуйте!!помогите сделать фильтрацию. на форме расположены 2 компонента...

Фильтрация в table с datetimepicker
Здравствуйте....есть DBgrid с базой данных.Как cделать фильтрацию , чтоб при выборе даты с...

Фильтрация по двум датам DateTimePicker
Есть БД SQL Server Надо осуществить фильтрацию по двум полям (датам: DateTimePicker1,...

Фильтрация данных через два DateTimePicker
Есть две таблицы del] вывести информацию обо всех маршрутах самолетов данного типа в указанный...

5
47 / 47 / 5
Регистрация: 02.03.2010
Сообщений: 119
26.07.2011, 17:57 2
Цитата Сообщение от dumser2 Посмотреть сообщение
что нада ставить вместо ??????
пробуй DateTimePicker1.Date
0
1 / 1 / 0
Регистрация: 24.07.2011
Сообщений: 47
26.07.2011, 18:28  [ТС] 3
[Error] Unit1.pas(158): Incompatible types: 'String' and 'TDate'
Ошибка!
0
47 / 47 / 5
Регистрация: 02.03.2010
Сообщений: 119
26.07.2011, 19:42 4
Приведи дату к строке

Delphi
1
function DateToStr ( Date : TDateTime ) : string;
Delphi
1
2
3
4
5
var
date: string;
begin
date:= DateToStr(DateTimePicker1.Date);
end;
А потом уже

Delphi
1
Table1.Filter:='DATA=' + date;
Только я вот не помню, может понадобится написать Table1.Filter:='DATA=' + QuotedStr(date), чтобы недостающие кавычки дописать, дельфи под рукой проверить нету.
1
1 / 1 / 0
Регистрация: 24.07.2011
Сообщений: 47
26.07.2011, 20:18  [ТС] 5
ругается на
date: string;

Добавлено через 17 минут
Вопрос на половину решон, вот код
Table1.Filter:='Дата >= '+ '''' + DatetoStr(DateTimePicker1.Date)+ '''';

Большое спасибо кто откликнулся.
0
1430 / 1189 / 228
Регистрация: 04.04.2011
Сообщений: 4,142
27.07.2011, 11:57 6
Далеко не факт, что будет работать правильно, т.к. формат, который установлен в локальных настройках BDE, может не соответствовать тому, что Вы подсовываете.
Правильно использовать sql-преобразование к нужной Вам строке либо вместо св-ва Filter использовать событие Table1.OnFilterRecord, в котором просто сравнивать данные в их "нативном" виде.
А совсем правильно заменить Table на Query и вместо фильтрации делать отбор (Select .. from .. where ..)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.07.2011, 11:57

Фильтрация с применением DateTimePicker
Здравствуйте! Я решила сделать фильтрацию БД с использованием 2 -х компонентов DateTimePicker, 2...

Фильтрация dateTimePicker, не учитывает год
Здравствуйте! Вообщем проблема заключается в следующем: есть dataset и dataGridView, есть поле с...

Фильтрация с использованием combobox и datetimepicker
Здравствуйте. Очень нужна помощь. Как сделать фильтрацию в DataGridView с использованием combobox и...

Фильтрация в datagridview с использованием dateTimePicker
И снова всем привет) Прошлую тему переместили в другой раздел, хотя я не понимаю почему(скорее...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.