Pada artikel sebelumnya telah dijelaskan bagaimana membuat filter database menggunakan komponen zeos, di artikel ini masih akan saya beri contoh memfilter database tapi kali ini kita akan memfilter dengan dua kondisi misalnya kita ingin menampilkan data dari absensi nomer sekian sampai sekian. Seperti halnya pada artikel sebelumnya siapkan database dan tabel yang akan kita filter.
Untuk lebih mudahnya bisa baca artikel sebelumnya tentang Filter Database di delphi 7. Nah dari program yang telah dibuat pada artikel sebelumnya tambahkan edit text satu lagi, dan jika sebelumnya yang kita filter berdasarkan kota sekarang kita akan mempfilter berdasakan nomer jadi coding di button1 menjadi seperti ini
with ZTable1 do
begin
Active:=True;
Filter:='no>='''+Edit1.Text+''' and no<='''+Edit2.Text+'''';
Filtered:=True;
end;
Untuk lebih mudahnya bisa baca artikel sebelumnya tentang Filter Database di delphi 7. Nah dari program yang telah dibuat pada artikel sebelumnya tambahkan edit text satu lagi, dan jika sebelumnya yang kita filter berdasarkan kota sekarang kita akan mempfilter berdasakan nomer jadi coding di button1 menjadi seperti ini
with ZTable1 do
begin
Active:=True;
Filter:='no>='''+Edit1.Text+''' and no<='''+Edit2.Text+'''';
Filtered:=True;
end;
Untuk view dan tataletak tampilan programnya terserah anda
Nah jika sudah silahkan coba runing program anda. Ok selamat mencoba dan mudah-mudahan bermanfaat, untuk contoh programnya anda bisa download di sini
mas bisa kirim file nya soalnya gak bisa didownload
BalasHapus