Nesse caso seria melhor usar a função Pos.

procedure Tdm.cdsTabelaFilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
  Accept :=  Pos('SILVA',  cdsTabelaNOME.AsString) <> 0;
end; 

__________________________________________________
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Responder a