Фильтрация - БД в Delphi

Katerina_K · 19.01.2014, 06:24

Фильтрация

Делаю фильтрацию от и до.Есть два варианта,но оба не работают.Подскажите почему?

Код:

DataModule2.AdoDataset1.Filtered:=false;
DataModule2.ADODataSet1.Filter:='(Средний_балл BETWEEN QuotedStr(Edit3.text) and QuotedStr(Edit4.Text))' ;
DataModule2.AdoDataset1.Filtered:=true;

и

Код:

DataModule2.ADODataSet1.Close;
DataModule2.ADODataSet1.CommandText:= 'SELECT * FROM Студенты WHERE Средний_балл BETWEEN QuotedStr(edit3.text) and QuotedStr(edit4.text)';
DataModule2.ADODataSet1.Open;

Streletz · 19.01.2014, 09:44

ADO или БД при фильтрации ошибок не выдаёт?
QuotedStr находится в строковой константе и не воспринимается как функция. Вызывайте QuoteStr вне строковой константы. Для создания строки фильтра используйте конкатенацию.
В помощь: Рассуждения о QuotedStr
Если этого будет недостаточно, попробуйте заменить between на <,>,<=,>=.
В помощь:
Фильтрация
Data.DB.TDataSet.Filter
Найти все таблицы базы данных при помощи ADO

Katerina_K · 19.01.2014, 10:07

Спасибо!Получилось!

19.01.2014, 06:24	#1
Katerina_K Пользователь Регистрация: 11.05.2013 Сообщений: 19	Фильтрация Фильтрация Делаю фильтрацию от и до.Есть два варианта,но оба не работают.Подскажите почему? Код: `DataModule2.AdoDataset1.Filtered:=false; DataModule2.ADODataSet1.Filter:='(Средний_балл BETWEEN QuotedStr(Edit3.text) and QuotedStr(Edit4.Text))' ; DataModule2.AdoDataset1.Filtered:=true;` и Код: `DataModule2.ADODataSet1.Close; DataModule2.ADODataSet1.CommandText:= 'SELECT * FROM Студенты WHERE Средний_балл BETWEEN QuotedStr(edit3.text) and QuotedStr(edit4.text)'; DataModule2.ADODataSet1.Open;` Последний раз редактировалось Stilet; 19.01.2014 в 11:07.

19.01.2014, 09:44	#2
Streletz Старожил Регистрация: 03.01.2014 Сообщений: 2,870	ADO или БД при фильтрации ошибок не выдаёт? QuotedStr находится в строковой константе и не воспринимается как функция. Вызывайте QuoteStr вне строковой константы. Для создания строки фильтра используйте конкатенацию. В помощь: Рассуждения о QuotedStr Если этого будет недостаточно, попробуйте заменить between на <,>,<=,>=. В помощь: Фильтрация Data.DB.TDataSet.Filter Найти все таблицы базы данных при помощи ADO Мой скромный Web-сайт Последний раз редактировалось Streletz; 19.01.2014 в 09:52.

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Фильтрация	rule-z	C# (си шарп)	0	16.08.2012 13:38
Фильтрация	Bek-Z	БД в Delphi	1	04.05.2011 23:03
Фильтрация в БД	M@riy@	БД в Delphi	5	27.09.2010 13:37
Фильтрация	Screame	Microsoft Office Excel	7	30.07.2009 13:49

19.01.2014, 10:07	#3
Katerina_K Пользователь Регистрация: 11.05.2013 Сообщений: 19	Спасибо!Получилось!