0 / 0 / 0
Регистрация: 21.05.2018
Сообщений: 3
1
RAD 2006-2007

Фильтрация через OnFilterRecord

21.05.2018, 22:54. Показов 1932. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте! !!!ОЧЕНЬ СРОЧНО!!!
База SQL Server Managment Studio 2012!
Есть две таблицы POSETITELI(главная) и POSESHENIYA(подчиненная)
Прописал на DataModule глобальную команду в Public (ed: String;)
Прописал в таблицу (POSESHENIYA) в свойство OnFilterRecord следующий код:

Delphi
1
2
3
4
5
6
7
8
9
procedure TDataModule2.POSESHENIYAFilterRecord(DataSet: TDataSet;
  var Accept: Boolean);
  var s : String; // Для значения поля
  begin
  s:= Copy(DataSet ['DATA_POSESHENIYA'], 1, Length(ed));
  Accept:=s =ed;
end;
 
end.
Прописал в Edit в свойство OnChange следующий код:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure TForm5.Edit1Change(Sender: TObject);
begin
  //если в поле Edit1 есть хоть одна буква,
  if Edit1.Text <> '' then begin
    DataModule2.POSESHENIYA.Filtered := False; //отключаем фильтр
    DataModule2.ed := Edit1.Text; //передаем в DataModule2 новый текст
    DataModule2.POSESHENIYA.Filtered:= True; //включаем фильтр
  end
  //если букв нет, фильтрацию отключаем:
  else DataModule2.POSESHENIYA.Filtered := False;
 
end;
 
end.
!!!ЗАДАЧА!!!

Нужные мне для фильтрации данные находятся в подчиненной таблице (POSESHENIYA). Фильтр работает как надо. Но. Записи в главной таблице не переключаются, т.е. если при фильтре в подчиненной таблице выводится 2 посещения, то и в главной таблице должны выводиться 2 посетителя соответствующие этим посещениям. А у меня выводятся например на 2 посещения, ВСЕ посетители.
Помогите пожалуйста! Спасибо!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.05.2018, 22:54
Ответы с готовыми решениями:

Событие OnFilterRecord
Здравствуйте всем! Помогите пожалуйста решить проблему. В событии OnFilterRecord прописываю код: ...

OnFilterRecord. Работает но немного криво :)
Описание: Сделано представление в SQL Server выведено в DBGrid с сортировкой по названию (в...

Onfilterrecord как привязать фильтрацию к кнопке поиска?
хочу в бд организовать поиск с фильтрцией. получилось так что ввожу в поле edit и фильтрация...

Фильтрация через едит
добрый день SELECT Описание_квартиры.Plohad, Описание_квартиры., Описание_квартиры.Адрес FROM...

1
5815 / 4552 / 1436
Регистрация: 14.04.2014
Сообщений: 20,238
Записей в блоге: 20
21.05.2018, 23:29 2
вы понимаете что такое ГЛАВНАЯ, а что такое ПОДЧИНЕННАЯ ?
с какого ГЛАВНАЯ должна изменяться в зависимости от ПОДЧИНЕННОЙ ???
из названия собсно ясно кто от кого зависит

если хотите наоборот, кто вам мешает настроить связи правильно?
0
21.05.2018, 23:29
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.05.2018, 23:29
Помогаю со студенческими работами здесь

Фильтрация через ComboBox
Здравствуйте. Есть 3 фильтра. Они работают только в одном порядке, например я выбираю фильтр 1,...

Фильтрация через ComboBox
Подскажите пожалуйста. Проблема в том, что когда открываешь программу и делаешь фильтрацию, то все...

Фильтрация через комбобокс
На форме есть два комбобокса. Источником записей для первого является запрос SELECT .Название,...

Фильтрация через Combobox
Здраствуйте, помогите пожалуйста решить следующую задачу. Есть поле со списком должностей например:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru