duvida filtro em relatorio quickreport

Delphi

02/11/2003

To criando meu primeiro ´projeto´ com relatórios e estou com uma duvida sobre o quickreport, é que estou tentando criar um relatorio com um filtro entre duas datas só que o filtro só funciona se as datas escolhidas forem as mesmas.
provavelmente é alguma burrice da minha parte mas é que to começando agora no delphi, alguem pode me dizer o que ta errado no codigo abaixo ou me dar algum exemplo de como filtrar duas datas.

var
f1,f2 :tdatetime;
begin

//inicializando as variaveis
f1:=MonthCalendar1.date;
f2:=MonthCalendar2.date;

//iniciando filtro
dm.table2.setrangestart;
dm.table2data.value:=f1;
dm.table2.setrangeend;
dm.table2data.value:=f2;
dm.table2.applyrange;

//testando primeiro filtro
if(dm.table2data.value=f1)then

//testendo segundo filtro
if(dm.table2data.value=f2)then

//chamando o form filtrodata
begin
frmfiltrodata:=tfrmfiltrodata.create(application);
frmfiltrodata.quickrep1.preview;
end
else

//menssagem segunda data não encontrada
Application.MessageBox(´A data final não existe nos registros ´,´Erro - filtro incorreto´,16)
else

//menssagem primeira data não encontrada
Application.MessageBox(´A data inicial não existe nos registros ´,´Erro - filtro incorreto´,16);

//encerrando filtro
dm.table2.cancelrange;
end;


Ggo_guigo

Ggo_guigo

Curtidas 0
POSTAR