Membuat laporan per periode pada delphi 7 dengan Sql
Langkah-langkahnya:
sediakan 2 buah datetime picker dan tombol button cetak
pada button cetak masukkan script:
quickreport1.adoquery1.SQL.Clear;
quickreport1.adoquery1.SQL.Add( 'select * from transaksi where transaksi.tgl_trans >= :Awal and transaksi.tgl_trans <= :Akhir');
quickreport1.adoquery1.Close;
quickreport1.adoquery1.Parameters.ParamValues['Awal']:=datetostr(datetimepicker1.DateTime);
quickreport1.adoquery1.Parameters.ParamValues['Akhir']:=datetostr(datetimepicker2.DateTime);
quickreport1.adoquery1.ExecSQL;
quickreport1.adoquery1.Prepared;
quickreport1.adoquery1.Open;
if
quickreport1.adoquery1 .RecordCount > 0 then
quickreport1 .preview
else
showmessage('data tidak ditemukan');
oiya guys,,,datetimepicker tu format tanggal nya yyyy/mm/dd
maka dari itu pada settingan komputer kalian juga disetting format seperti itu juga ya,,,,
