Passar filtro fixo para Gridpesquisa
Enviado: Dezembro 7th, 2012, 10:27 am
Estou montando um relatório de caixa e no clique de um XNumEdit coloquei o seguinte código:
begin
FormGridPesquisa := TFormGridPesquisa.Create(Application);
Try
FormGridPesquisa.Atalho := VK_F8;
FormGridPesquisa.Campo := TabGlobal.Dcaixa.CLI_CODIGO;
FormGridPesquisa.Avulso := True;
if FormGridPesquisa.ShowModal = mrOk then
XNumEdit1.Value := FormGridPesquisa.Resultado;
Finally
FormGridPesquisa.Free;
end;
end;
Tem como passar um filtro fixo para esse esse formulário GridPesquisa sem ser pelas definições de chave estrangeira na Tabela?
begin
FormGridPesquisa := TFormGridPesquisa.Create(Application);
Try
FormGridPesquisa.Atalho := VK_F8;
FormGridPesquisa.Campo := TabGlobal.Dcaixa.CLI_CODIGO;
FormGridPesquisa.Avulso := True;
if FormGridPesquisa.ShowModal = mrOk then
XNumEdit1.Value := FormGridPesquisa.Resultado;
Finally
FormGridPesquisa.Free;
end;
end;
Tem como passar um filtro fixo para esse esse formulário GridPesquisa sem ser pelas definições de chave estrangeira na Tabela?