Senin, 15 Maret 2010


Pertama kali membuat aplikasi database pasti banyak sekali hal sulit yang telah dialami, dimulai dari cara koneksi ke database, membuka database, menutup database, dan lain sebagainya. Tapi saya yakin bahwa programmer pemula memiliki pertanyaan yang sama dengan saya yaitu bagaimana cara me-refresh table? Lalu dipikiran kita langsung tertuju ke auto refresh.
Saya memaklumi apa yang pemula alami, karena saya pun seperti itu. Baik, saya jelaskan saja cara auto refresh table atau database ini.  Saya pernah menulis artikel tentang kelemahan auto refresh ini jadi silakan untuk dipelajari. Perlu diketahui bahwa auto refresh tidak sederhana tetapi tidak sesulit yang dikira.
Sebenarnya melakukan refresh itu sama dengan menutup tabel lalu membuka nya kembali atau
table1.close;
table1.open;
Namun yang menjadi masalah adalah tanda untuk melakukan tutup buka tabel ini, jika menggunakan bantuan socket programming tanda ini akan terdeteksi. Tapi jangan dipikirkan dulu masalah socket programming ini nanti malah menjadi pusing. Nah, sekarang harus dipikirkan bagaimana caranya untuk menutup buka tabel tanpa adanya tanda perubahan? Kita bisa menggunakan komponen TTimer. Berilah tenggang waktu yang cukup untuk menutup dan membuka tabel ini. TTimer dapat ditemukan di Tab System seperti terlihat pada gambar.
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Tabel1.close;
Tabel1.open;
end;
Kemudian pada saat form onshow ketikan perintah ini Timer1.Enabled := True;

;;