Data Inicio e Data Fim
Pessoal!!!Boa noite!!!
Seguinte!!!Iniciante!!!Rsss
Edit1.Text = Bandeira do Cartão
MaskEdit1.Text = Data Inicial
MaskEdit2.Text = Data Final
Edit2.Text = Valor Total dos Itens Selecionados na DbGrid Com o Desconto
Edit3.Text = Valor Total dos Itens Selecionados na DbGrid Sem o Desconto
BitBtn.Click = Baixar - Sumir do DbGrid
Preciso do seguinte, eu informar no Edit1.Text a bandeira do cartão, no MaskEdit1.Text a data inicial e no MaskEdit2.Text a data final, quando eu terminar de digitar a data final e dar Enter, os dados são mostrado no dbgrid, após a exibição no dbgrid, eu vou pressionando enter, e ir ficando selecionado e ao mesmo tempo ir somando os valores no Edit2.Text e no Edit3.Text, após selecionado tudo eu clico em baixar e não será mais mostrado no DbGrid !!!Mais eu não sei como fazer!!!Alguem Ajuda!!!
Obs1.: Eu uso só componentes da Paleta Ado
Abraços!!!
Seguinte!!!Iniciante!!!Rsss
Edit1.Text = Bandeira do Cartão
MaskEdit1.Text = Data Inicial
MaskEdit2.Text = Data Final
Edit2.Text = Valor Total dos Itens Selecionados na DbGrid Com o Desconto
Edit3.Text = Valor Total dos Itens Selecionados na DbGrid Sem o Desconto
BitBtn.Click = Baixar - Sumir do DbGrid
Preciso do seguinte, eu informar no Edit1.Text a bandeira do cartão, no MaskEdit1.Text a data inicial e no MaskEdit2.Text a data final, quando eu terminar de digitar a data final e dar Enter, os dados são mostrado no dbgrid, após a exibição no dbgrid, eu vou pressionando enter, e ir ficando selecionado e ao mesmo tempo ir somando os valores no Edit2.Text e no Edit3.Text, após selecionado tudo eu clico em baixar e não será mais mostrado no DbGrid !!!Mais eu não sei como fazer!!!Alguem Ajuda!!!
Obs1.: Eu uso só componentes da Paleta Ado
Abraços!!!
Bruno Henrique
Curtidas 0
Respostas
Bruno Henrique
17/07/2013
Alguem??
Abraços
Abraços
GOSTEI 0
Joel Rodrigues
17/07/2013
Vamos lá. Não parece difícil, mas onde reside a dúvida principal?
GOSTEI 0
Bruno Henrique
17/07/2013
Bom dia!!!
Fazer aparecer no dbgrid só o que eu filtrei nos edits e nas maskaras!!!
Abraços
Fazer aparecer no dbgrid só o que eu filtrei nos edits e nas maskaras!!!
Abraços
GOSTEI 0
Alessandro Yamasaki
17/07/2013
Mais ou menos vc deverá seguir esta ideia
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'select * from tabelax where campo1 = ' + edit1.text;
ADOQuery1.Open;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'select * from tabelax where campo1 = ' + edit1.text;
ADOQuery1.Open;
end;
GOSTEI 0
Joel Rodrigues
17/07/2013
Você sabe realizar consultas com ADOQuery?
É só passar as datas como parâmetro e preencher esses parâmetros com o conteúdo dos edits. Por exemplo:
Pesquise sobre:
- Converter string para data;
- Usar parâmetros em queries;
Abraço.
É só passar as datas como parâmetro e preencher esses parâmetros com o conteúdo dos edits. Por exemplo:
ADOQuery1.SQL.Text := 'SELECT * FROM VENDAS WHERE DATA BETWEEN :dataInicio AND :dataFim';
ADOQuery1.Parameters.ParamByName('dataInicio').AsDateTime := StrToDate(maskEdit1.Text);
ADOQuery1.Parameters.ParamByName('dataFim').AsDateTime := StrToDate(maskEdit2.Text);
ADOQuery1.Open;
Pesquise sobre:
- Converter string para data;
- Usar parâmetros em queries;
Abraço.
GOSTEI 0
Bruno Henrique
17/07/2013
Olha eu fiz um teste aqui e funcionou perfeitamente!!! não imaginava nunca que o dbgrid atualizaria sozinho quando eu fiz os parametros.
Agora uma duvida!!!
Quando eu apago as datas com delete ou backspace, como faço para o dbgrid trazer todos os dados de volta????
Abraços
Agora uma duvida!!!
Quando eu apago as datas com delete ou backspace, como faço para o dbgrid trazer todos os dados de volta????
Abraços
GOSTEI 0
Joel Rodrigues
17/07/2013
É só fazer a mesma coisa, mas tirando o filtro, ou seja, a cláusula WHERE da instrução SQL ou ainda mudando o filtro para outro que você deseje.
GOSTEI 0