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

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

Фильтр для Table [D7]


neat ©   (2006-01-27 14:54:00) 

Странное дело. Раньше всё было нормально, а именно

procedure TfmReestrOfActs.DateTimePickerChange(Sender: TObject);
var d : TDate;  
begin
   if QuerySt.Active then
       QuerySt.Close;
   QuerySt.Params.ParamValues['DateReis'] := DateTimePicker.Date;
   QuerySt.Open;
   if Table.Filtered then
       Table.Filtered := false;
   d := DateTimePicker.Date;
   Table.Filter := 'Date_ ='+ DateToStr(d);
   Table.Filtered := True;
   .
   .
end;

Сейчас почему-то при первой смене даты в DateTimePicker выдаётся сообщение "Table does not support this operation"на строке

if Table.Filtered then
       Table.Filtered := false;

но сам фильтр срабатывает, данные в таблице появляются какие нужно. При дальнейших обращениях к DateTimePicker всё нормально. Компоненты BDE. Что могло случиться?


Johnmen   (2006-01-27 16:55:00) [1]

if'ы эдесь вообще лишние.
Просто
QuerySt.Close;
и
Table.Filtered := false;


Val   (2006-01-27 16:14:00) [2]

там две строки. что в стеке?


Наверх

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