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

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

Посимвальная отфильтрация данных в Delphi [D5, Paradox, ]

Voi ©   (2002-01-15 15:02:00) 

Помогите, создать посимвольную отфильтрацию данных в 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;
РАБОТАЮТ ОЧЕНЬ МЕДЛЕННО!

---

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

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

---

roottim   (2002-01-15 15:08:00) [2]

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

---

Наверх