Dica: Filtrar Grid Pesquisa (via código)

[andrec]

Boa tarde,

Segue uma dica que pode facilitar a vida de alguns (como facilitou a minha).
Quem está habituado a usar GridPesquisa já se deparou com esta situação, como, por exemplo, filtrar cidades de apenas um estado selecionado, filtrar contas do tipo apenas Receita ou Despesa conforme um tipo selecionado como é o caso exemplificado abaixo:

FormGridPesquisa := TFormGridPesquisa.Create(Application);
Try
FormGridPesquisa.Atalho := VK_F8;
FormGridPesquisa.Campo := TabGlobal.DLCCXBCO.PLA_CODIGO;
FormGridPesquisa.Campo.FiltroFixo.Add('PLANOCT.PLA_TIPO LIKE '+#39+'D%'+#39+'');
FormGridPesquisa.Avulso := True;
if FormGridPesquisa.ShowModal = mrOk then
XNumEdit3.Value := FormGridPesquisa.Resultado;
XNumEdit3exit(self);
Finally
FormGridPesquisa.Campo.FiltroFixo.Clear;
FormGridPesquisa.Free;
end;

O código acima é o código padrão gerado pelo Xmaker para uma chamada a um Grid de Pesquisa. As duas linhas em destaque é que são as linhas extras adicionadas para aplicar o filtro desejado. Uma aplica e a outra ao final remove.