Código
tenho: datasouce1, adotable1, dbgrid1, button1;
agora simples: no evento onfilterrecord da adotable1 coloque:
if (pos(Edit1.Text, adotable1Nome.Value)<> 0) then
Accept := true
else
Accept := false;
no evento onclick do button1 coloque:
ADOTable1.Filtered:=false;
ADOTable1.Filtered:=true;
pronto
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009