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

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

Как отфильтровать в TTable по полю даты? [D5, Paradox]


wHammer ©   (2002-12-04 14:44:00) 


wHammer   (2002-12-04 15:19:00) [1]

http://www.books.ru/shop/books/5790
Оттуда - стр 125, 3 параграф -
"Это предотвращает модификация НД во время фильтрации" и это не есть гуд, к сожалению...


FreeLancer   (2002-12-04 15:10:00) [2]


> Но мне нужно фильтровать по нескольким (не только типа даты)
> полям?


:-( Ох-хо-хо...

table1.Filtered := true;
...

procedure TForm1.Table1FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept := (
(Table1Date_Field.AsDateTime = "01.01.2001")
and
(Table1String_Field.AsString = "Нужно фильтровать")
);
end;


http://www.books.ru/shop/books/5790


wHammer   (2002-12-04 14:52:00) [3]

Но мне нужно фильтровать по нескольким (не только типа даты) полям?


FreeLancer   (2002-12-04 14:50:00) [4]

:-)
Имею в виду, кроме "Свойства TTable.Filter" (не использовать)


FreeLancer   (2002-12-04 14:48:00) [5]


table1.Filtered := true;
...

procedure TForm1.Table1FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept := (Table1Date_Field.AsDateTime = "01.01.2001");
end;


wHammer   (2002-12-04 14:47:00) [6]

Имею ввиду свойство TTable.Filter


Наверх

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