gracias por su ayuda lo resolvi de la siguiente manera por si a alguien le puede servir :
Código Delphi
[-]procedure TForm4.informeBeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
qrlabel6.Caption:='De '+ FormatDateTime('dd/mm/yyyy',form3.ini.Date) + ' a ' + FormatDateTime('dd/mm/yyyy',form3.fin.Date);
end;