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
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
IT Tutorial, Training Center & IT Solution
No comments:
Post a Comment