bene 0 Denunciar post Postado Maio 27, 2005 Boa tarde amigos, eu fiz um software que contem um relatorio de busca por data inicial e data final, mas com o codigo que eu coloquei só esta filtrando a data um dia antes do digitado. Exemplo:21/05/05 á 27/05/05, na DBGrid só mostra do dia 21/05/05 á 26/05/05, e não aparece até o dia 27/05/05, como o digitado, oque faço?Olha o codigo ai!:beginDataModule1.relatorio.Close;DataModule1.relatorio.SQL.Clear;DataModule1.relatorio.SQL.Add('Select*');DataModule1.relatorio.SQL.Add('From cad_os');DataModule1.relatorio.Open;MaskEdit1.SetFocus;MaskEdit2.SetFocus;If bt_Filtro.Tag = 1 ThenBegin//Desabilitar o FiltroDataModule1.relatorio.Filtered := False;MaskEdit1.Text := '';MaskEdit2.Text := '';bt_Filtro.Hint := 'Filtrar';bt_Filtro.Tag := 0;Exit;End;//Se for preenchido somente o inicial, o final recebe o inicialIf ((MaskEdit1.Text <> '') AND (MaskEdit2.Text = '')) ThenMaskEdit2.Text := MaskEdit1.Text;beginfrm_relatorio_sos.QRLabel12.Caption:= MaskEdit1.Text;frm_relatorio_sos.QRLabel13.Caption:= MaskEdit2.Text;end;DataModule1.relatorio.Filter:='Data>='''+MaskEdit1.Text+''''+' and Data<='''+MaskEdit2.Text+'''';DataModule1.relatorio.Filtered := True;bt_Filtro.Tag := 1;bt_Filtro.Hint := 'Desfiltrar'; Compartilhar este post Link para o post Compartilhar em outros sites
proteus 0 Denunciar post Postado Maio 28, 2005 ?!meu..num é por nada não..mas eu acho que relatórios onde você filtra tudo via sql fica mais rápido..exige tem menos..reavalia ai.. Compartilhar este post Link para o post Compartilhar em outros sites
Totodile 0 Denunciar post Postado Maio 28, 2005 ow, tmb nao é por nada nao, mas tipo, seu codigo ta meio sem organização, se outro dia alguma outra pessoa ver seu código, vai ser banal... Compartilhar este post Link para o post Compartilhar em outros sites