Filtro em relatório \

[Leão]

Olá Hudnet, fiz conforme seu exemplo, mas não teve efeito nenhum, agradeço e aguardo...

[hudnet]

Leão me add no skype hudnet ou no gmail hudson@activemaster.com.br pra eu tentar te ajudar, fiz um teste no meu e este filtro funcionou normal.

[Leão]

Certo vou te add, e baixe https://www.teamviewer.com/pt/download/ ... -versions/
versão 9

Obrigado,
Leão

[Leão]

Olá, agora deu certo dessa maneira, conforme orientou o Hudnet

procedure TFormDigitacao2.XNumEdit2BtnClick(Sender: TObject);
begin

FormGridPesquisa := TFormGridPesquisa.Create(Application);
Try
FormGridPesquisa.Atalho := VK_F8;
FormGridPesquisa.Campo := TabGlobal.DProdutores.COD_LINHA;
TabGlobal.DProdutores.COD_LINHA.FiltroFixo.Text := '(LINHAS.COD_PRACA= '+XnumEdit1.Text+') ';
FormGridPesquisa.Avulso := True;
if FormGridPesquisa.ShowModal = mrOk then
XNumEdit2.Value := FormGridPesquisa.Resultado;
Finally
FormGridPesquisa.Free;
end;


end;



Obrigado,
Leão