Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фильтрация Table [D3, D5, Paradox]


OxOTHuK ©   (2003-05-23 22:49:00) 

есть такой код, который в соответствии с элементами на форме, устанавливает критерий фильтрации таблицы. Проблема в том, что некоторые поля заплнены РУССКИМИ словами, а их надо писать в одиночных кавычках типа: name="Вася Пупкин", если писать ручками, то никаких проблем, а если прграммно (см.ниже) то компилятор ругается (зараза такая)...

И еще вопрос: как поставить фильтрацию по маске (name="Вася"*, т.е. всех Вась надо вывести)

procedure TForm1.Button1Click(Sender: TObject);
begin
if combobox1.Text<>""
then table1.Filter:="ocenka="+combobox1.Text;
if combobox2.Text<>""
then table1.Filter:=Table1.filter+
" and kurs="+combobox2.Text;
if edit1.Text<>"" then
table1.Filter:=Table1.filter+" and fio="+#39+edit1.Text+#39;
table1.Filtered:=true;
end;


OxOTHuK   (2003-05-26 23:26:00) [1]

>> Leshiy ©
tnx... моя промашечка..

>> ALL

Всем спасибо - вопрос ЗАКРЫТ


Leshiy   (2003-05-25 08:35:00) [2]

Если combobox1.Text="" а
combobox2.Text<>""
то что получаем в Table1.Filter? :)


OxOTHuK   (2003-05-24 23:31:00) [3]

>> Ovsjanikov: В таблице фамилии и имена без кавычек, но в фильтре надо добавить одиночные кавычки " ", наверное потому, что фамилия имя и отчество находятся в одном поле.
NoPartialCompare - это где?

>>Zacho
Ругается на строку "and "

>> ALL
А нельзя установить поиск по подстроке?


Ovsjanikov   (2003-05-24 11:29:00) [4]

Что то я вопроса не понял ...
У тебя в таблице фамилии с кавычками записаны ???

Поле: FIO
ИВАНОВ
ПЕТРОВ
...

Table1.filter:="И*";
выводит всех на И...
Только нужно в свойствах таблицы выключить NoPartialCompare.

А вот с кавычками я так вопроса и не понял...


Zacho   (2003-05-23 23:14:00) [5]

А, случайно, функция AnsiQuotedStr не поможет ?
И неплохо было бы привести текст сообщения об ошибке.


Наверх

Титульная страница Поиск, карта сайта Написать письмо