Tips melakukan Pencarian Data di Delphi Berdasarkan Tanggal Menggunakan Filter Tanggal DateTime Picker

Untuk melakukan pencarian data di delphi menggunakan fiter tanggal dari datetime picker ada dua cara yaitu pencarian berdasarkan satu tanggal dan pencarian berdasarkan periode artinya terdiri dari dua tanggal. Desain Form dan Syntaknya sbb:

DESAIN FORM PENCARIAN TANGGAL

Syntak untuk satu tanggal

Coding Menggunakan SQL

Begin with qr_transaksi do   begin     close;     sql.Clear;     sql.Add('select * from penjualan_obat where tgl_penjualan = "'+FormatDateTime('YYYY-MM-DD',tgl_cari.Date)+'"');     open; end;

Syntak untuk dua tanggal (Periode)

Coding Menggunakan SQL

begin with qr_transaksi do   begin     close;     sql.Clear;     sql.Add('select * from penjualan_obat where tgl_penjualan between "'+FormatDateTime('YYYY-MM-DD',TGL1.Date)+'" AND "'+FormatDateTime('YYYY-MM-DD',TGL2.Date)+'"' );     open;   end; end;

Keterangan

Untuk Memformat Tanggal menjadi Settingan Bahasa Indonesia gunakan format :
dd/MM/yyyy        : Bulan Ditampilkan dalam Angka
dd/MMM/yyyy    : Bulan ditampilkan dengan Teks

Selamat Mencoba

PADEPOKAN IT COURSES
IT Tutorial, Training Center & IT Solution

www.padepokanit.com