Цитата:
|
Сообщение от windaws
 уже за это выпирают =) IF хоть небольшое представление есть THEN думаю в коде разберешься ELSE выпрут из универа 
Код:
procedure TPokupateli.Edit1Change(Sender: TObject);
begin
if (edit1.text<>'') then
begin
dm.org_table.Filter:='(Название LIKE '''+edit1.Text+'%'')';
dm.org_table.Filtered:=true;
end
else
dm.org_table.Filtered:=false;
end;
dm - модуль данных, если таблица находится на форме то можно не указывать
org_table - Название таблицы
Название - поле по которому будет осуществляться фильтрация. |
TPokupateli это что ???
и к чему его привязать
'(Название LIKE '''+edit1.Text+'%'')';
название в смысле базы или таблицы в базе у мну их три
