조회버튼을 클릭 한 후에 출력버튼을 누르면 정상적으로 출력이 되는데,,
조회버튼을 클릭하지 않고 바로 출력버튼을 클릭하면 자료가 출력이 안됩니다.
이건 어떻게 처리해야 할까요..?
    
    Application.CreateForm(Tform1, form1);
    try
        with form1.query1 do
        begin
        close;
        parambyname('store_cd').asstring := copy(combobox1.text,1,4);
        parambyname('date1').asdatetime := datetimepicker1.datetime;
        parambyname('date2').AsDatetime := datetimepicker2.datetime;
        open;
        end;

        with form1.query2 do
        begin
        close;
        parambyname('store_cd').asstring := copy(combobox1.text,1,4);
        parambyname('date1').asdatetime := datetimepicker1.datetime;
        parambyname('date2').AsDatetime := datetimepicker2.datetime;
        open;
        end;

        form1.QRlabel10.caption := datetostr(datetimepicker1.date);
        form1.QRlabel12.caption := datetostr(datetimepicker2.date);
        form1.quickrep1.preview;
        form1.quickrep1.free;
   finally
        form1.free;
   end;