Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Вниз

Индексация таблицы   Найти похожие ветки 

 
Вика   (2002-01-26 12:54) [0]

Hужно, что бы индексация Table осуществлялась по введённым символам в эдит.
Причём символы могут находиться в любом месте записи.

Решаю через OnFilterRecord
Accept:=Pos(F1.E1.Text,DateSet["xx"])>0;

Как нить можно сделать, что бы таблица фильтровалась без учёта высоты
введённых символов в эдит? Что бы запись "xxxxxxx xxxxxxxQWxxxx"
оставалась после фильтрации не только по введённому "QW" но и
по "qw" ???

Что то функция foCaseInsensitive в FilterOptions у меня не
заработала, как хотелось бы. Где-то, что-то упустила я....


 
wicked   (2002-01-26 16:41) [1]

можно сделать и так - на событие OnChange в эдите вешаешь обработчик примерно такого содержания:


if F1.E1.Text <> "" then begin
DateSet.Filter := "xx = " + F1.E1.Text + "*";
DateSet.Filtered := true;
end
else DateSet.Filtered := false;


и включаешь foCaseInsensitive в FilterOptions.....
недостатком такого способа - тормоза при больших наборах данных....
более элегантный способ - обойтись без фильтра... ;)
в тот же обработчик написать:

if F1.E1.Text <> "" then
DateSet.Locate("xx", F1.E1.Text, [loCaseInsensitive, loPartialKey]);

подробности смотри в help"е....


 
Anatoly Podgoretsky   (2002-01-26 23:53) [2]

Ты попробовал прежде чем советовать?

2 Вика
Accept:=Pos({Ansi}UpperCase(F1.E1.Text),UpperCase(DateSet["xx"]))>0;

Суть в том, что бы сначала привести к одному регистру.

ЗЫ: это кстати называется фильтрация, а не индексация



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.004 c
3-66493
kam_nal
2002-01-29 17:54
2002.02.21
Password при подключении к базе


1-66525
MystiX
2002-02-05 18:34
2002.02.21
Help!!!


3-66460
NightMan
2002-01-25 14:17
2002.02.21
Задержка с обновлением ?


1-66587
Brand
2002-02-06 00:34
2002.02.21
Автозагрузка через реестр, SysTray


6-66634
Иван Мхитаров
2001-12-03 13:45
2002.02.21
Использование TClientSocket внутри TServerClientThread





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский