Тема: Delphi+Access
Показать сообщение отдельно
  #3  
Старый 08.06.2009, 07:41
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Поскольку вы БД пожалели, посмотреть рабочий вариан не удалось, но вот на что сразу обращу внимание.
1. Поля.
Несмотря на то что акцесс позволяет использовать в именах таблиц/полей пробелы, при обращении к ним из Дельфи могут возникнуть проблемы, поэтому обрамляйте их квадратными скобками во избежании неоднозначностей.
2. Фильтр.
Обычно принято сначала устанавливать значение для фильтра, а уже потом его активировать, у вас-же получается все наоборот:
Код:
procedure TForm4.Button1Click(Sender: TObject);
begin
if (Length(Edit1.Text)>0) and (Length(Edit2.Text)>0)
then   DataModule2.ADOTable3.Filtered:=true else
DataModule2.ADOTable3.Filtered:=false;
	DataModule2.ADOTable3.Filter:='Время начала эксперимента>='''+Edit1.Text+''' and Время начала эксперимента<='''+Edit2.Text+'''';
end;
Вы отключаете фильтр, устанавливаете новое значение для него и не включаете его
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием