![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Фильтр для 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]там две строки. что в стеке?