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

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

компоненты Interbase [D6, IB6.x]


oss ©   (2002-11-11 17:00:00) 

Уважаемые, помогите! использую стандартные конпоненты в делфи7 для интербейса. Пытаюсь фильтровать набор данных, а ничего! как и не ставлю фильтр !
пример
tbObjects.Filter:="";
tbObjects.Filter:="type_id = "+inttostr(tbTypeBugsID.Value);
ShowMessage(tbObjects.Filter); // это для удостоверения
if not tbObjects.Filtered then
tbObjects.Filtered:=True;


Wolf226   (2002-11-11 18:05:00) [1]

2Oss

Может стоит для начала Help почитать, а потом спрашивать.

TDataSet.OnFilterRecord

Use an OnFilterRecord event handler to filter records using a criterion that can’t be implemented using the Filter property. For example, using the Filter property, field comparisons are not supported against local tables (Paradox, dBASE, Access, FoxPro), but an OnFilterRecord event handler can implement any criterion at all.


exit   (2002-11-11 17:23:00) [2]

Надо написать в другом месте (обр. наж. кнопки)

tbObjects.Filtered := false;
tbObjects.Filtered := true;

А вот

tbObjects.Filter

не пригодится при таком подходе


oss   (2002-11-11 17:19:00) [3]

таже история... вообще нет реакции на фильтры !


exit   (2002-11-11 17:13:00) [4]


procedure tbObjectsOnFilterRecord(DataSet: TDataSet; var Accept: Boolean)
begin
Accept := (tbObjects.FieldByName("type_id").AsInteger = tbTypeBugsID.Value)
end;

Но я бы лучше фильтровал в запросе.


Наверх

Титульная страница Поиск, карта сайта Написать письмо