Цитата:
|
Сообщение от TOJluK
Ну это уже похоже на лень...
Вот:
Код:
if Length(Edit1.Text)>0 then begin
AdoTable1.Filter:='[Фамилия] like ' +QuotedStr(Edit1.Text+'%');
ADOTable1.Filtered:=True
end
else
ADOTable1.Filtered:=False;
И если уж TTable используешь, то в гриде его DataSource указать надо, а не TQuery.
ЗЫ Я бы посоветовал забыть про TTable |
Не могли бы Вы скинуть саму программку, где видна реализация этого кода! (просто у меня до сих пор ничего не работает
)
Заранее благодарен!