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




Вниз

Посимвальная отфильтрация данных в Delphi 


Voi   (2002-01-15 15:02) [0]

Помогите, создать посимвольную отфильтрацию данных в Delphi.
База данных на 30000 адресов. Методы типа:
--
Table1.Filter:="phone="""+Edit1.Text+"*""";
Table1.Filtered := TRUE;
--
procedure TDM.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
case Length(MainForm.Edit1.Text) of
1: Accept:= Dm.Table1Phone.Value[1] = MainForm.Edit1.Text[1];
2: Accept:= Copy(Dm.Table1Phone.Value, 1, 2) = Copy(MainForm.Edit1.Text, 1, 2);
end;
РАБОТАЮТ ОЧЕНЬ МЕДЛЕННО!



roottim   (2002-01-15 15:08) [1]

а их всего 2 метода...
попробуй закачать вместо табле .. запросом... и сравни...



Alexandr   (2002-01-16 08:41) [2]

да запросом быстрее будет, видимо...




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




Наверх





Память: 0.72 MB
Время: 0.024 c
1-32192           sasha22               2002-01-26 16:23  2002.02.11  
Как создать свой Help?


3-32144           Doctor Vrach          2002-01-15 20:09  2002.02.11  
Помогите плиз - надо чтобы во время сложного запроса основное окно программы реагировало


1-32245           Sasha2                2002-01-27 00:12  2002.02.11  
Как удалить выделенную запись из Tstringgrid?


7-32356           Строр                 2001-11-04 19:00  2002.02.11  
Тоже про форматирование...


3-32143           Filat                 2002-01-14 20:55  2002.02.11  
Сравнение двух баз и программ на Access.