Тема: MS ACCeSs
Показать сообщение отдельно
  #5  
Старый 14.02.2008, 22:00
SSA SSA вне форума
Прохожий
 
Регистрация: 04.02.2008
Сообщения: 13
Репутация: 10
По умолчанию

Цитата:
Сообщение от Appolon
Тебе тоже доброго времени суток!!

Если у тебя поле название текстовое тогда правильнее будет написать проседуру вот так:
Код:
procedure TForm1.NazFilterChange(Sender: TObject);
begin
  If Length(NazFilter.Text)>0 then
   begin
    ADOTable1.Filter:='Название like '+#39+NazFilter.Text+#42+#39;
    ADOTable1.Filtered:=true;
   end
  else
   ADOTable1.Filtered:=false;
end;
,где #39-это апостроф, а #42-это звездочка.

что касаемо нескольки полей, то по идее вот:

ADOTable1.Filter:='Название like '+#39+NazFilter.Text+#42+#39+' and Название2 like '+#39+NazFilter.Text+#42+#39+' and Название3 like '+#39+NazFilter.Text+#42+#39+' and Название4 like '+#39+NazFilter.Text+#42+#39;


Удачи!!

Спс очень помогло ))))




Вот еще вопросик можно ли в делфи создать отчет и вывести его на печать? Если можно подскажите как!! А то от нашего Любимого препода не добьешься не чего!
Ответить с цитированием