Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.22;
Скачать: CL | DM;

Вниз

Фильтрация в Delphi   Найти похожие ветки 

 
mrl   (2002-03-30 14:48) [0]

Необходимо отфильтровать в таблице tMegazin те записи у которых есть записи в подчиненой таблице tPublik

procedure TDataModule1.tMegazinFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=not(tPublik.IsEmpty);
end;

НЕ РАБОТАЕТ?! Подскажите в чем дело? Хочу обойтись без TQuery.

С уважением Валентин


 
VAleksey   (2002-03-30 16:54) [1]

Ну во первых (если я правильно понял из книги) если в tPablik есть записи то ее св-во isEmpty будет равно false.

Была у меня такая задача -) держи код для твоего случаю (будет тормозить немного -)), но у меня прошло была база примерно на 3000 записей )

procedure TDataModule1.tMegazinFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=tPublik.Locate("Поле по которому связаны таблицы",tMegazin.FieldByName("Поле по которому связаны таблицы").Value,[]);

end;



 
VAleksey   (2002-03-30 16:55) [2]

Можно использовать FindKey если по полю есть индекс.
Может будет побыстрее



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

Текущий архив: 2002.04.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
6-69952
Dimk
2002-02-08 22:51
2002.04.22
Как в виндах определить все сокеты и какими процессами они открыты?


3-69653
Зинец Виктор
2002-03-27 11:00
2002.04.22
Доступ к базе данных через инет


6-69945
otari
2002-02-09 22:48
2002.04.22
Это очен интересно !!!


1-69891
kserg@ukr.net
2002-04-09 13:12
2002.04.22
Как преобразовать множество к целому типу и обратно?


1-69861
Dimedrol
2002-04-02 10:47
2002.04.22
Interprocess data X-change...