Ekspresi | Les Private Arab-Inggris via WA dan BBM Gratis | Sunda | Kontak | Google | Gmail | Uang Adsense
Toko Baju Online Abah + Bonus
LP3I Tasikmalaya
Bahasa Arab (Kelas 1 SD sampai Universitas)
Bisnis Bitcoin | Daftar Isi | Tools Penting | PrivacyPolicy | Jago Bahasa Inggris dan Arab | Kamus | Kamus Google

Saturday, April 2, 2016

Tombol Next, Back, First, Last Buatan Sendiri Delphi 7



Hello Katabah!
Pada tutorial Delphi ini, saya belajar membuat tombol Next (Selanjutnya), Back (Sebelumnya), First (Pertama) dan Last (Terakhir).


Sedangkan data yang ditampilkan akan diperoleh dari tabel yang sudah ada bawaan Delphi. Jadi, kita tidak perlu membuat tabel baru dulu.

1. Buka Delphi 7
2. Klik BDE pada Component Pallete
3. Klik Table
4. Klik di area kosong pada form
5. Muncullah Table1
6. Klik Database Name pada Object Inspector – Properties
7. Pilih DBDEMOS
DBDEMOS adalah database yang disediakan Delphi untuk kita berlatih. Isinya ada beberapa tabel.

8. Masih di Properties, klik Table Name. Pilih animals.dbf
9. Masih di Properties juga, di paling atas ada Active. Pilih True.
10. Klik dua kali Table1 pada form
11. Muncul kotak Form1.Table1
12. Tekan Ctrl+F pada keyboard
13. Untuk memblok semua field name, klik NAME, tekan SHIFT pada keyboard (shift jangan dilepas), klik BMP. Sekarang semua field name sudah terblok (warna biru)
14. Tombol Shift jangan ditekan lagi
15. Klik field name yang sudah diblok tadi, misal pada NAME
16. Tarik ke area kosong form
17. Lepas mouse kita
18. Semua field name dan isinya sudah muncul di form

Sekarang, kita membuat tombol Next, Back, First, Last Buatan Sendiri dengan Delphi:

19. Klik Additional
20. Klik BitBtn
21. Klik di area kosong pada form
22. Muncullah BitBtn1 pada form
23. Klik Caption pada Object Inspector – Properties
24. Ketik: First
25. Klik lagi BitBtn pada Additional
26. Klik di sebelah kanan tombol First
27. Klik Caption pada Object Inspector – Properties
28. Ketik: Next
29. Klik lagi BitBtn pada Additional
30. Klik di bawah tombol First
31. Klik Caption pada Object Inspector – Properties
32. Ketik: Back
33. Klik lagi BitBtn pada Additional
34. Klik di bawah tombol Next
35. Klik Caption pada Object Inspector – Properties
36. Ketik: Last
Sampai di sini desain sudah beres, tapi masing-masing tombol belum bisa digunakan karena belum diisi script. Ini tampilannya:


Mari lanjutkan ke langkah 37 agar keempat tombol tersebut bisa berfungsi.

37. Klik dua kali tombol First pada form
38. Ketik script ini:
Table1.First;

39. Klik dua kali tombol Next pada form
40. Ketik script ini:
Table1.Next;

41. Klik dua kali tombol Back pada form
42. Ketik script ini:
Table1.Prior;


43. Klik dua kali tombol Last pada form
44. Ketik script ini:
Table1.Last;

45. Jalankan program dengan menekan F9 pada keyboard
46. Silahkan klik tombol-tombol yang empat tadi, maka data yang muncul di kotak Name, Size, Weight, Area dan BPM akan berubah-ubah


Tambahan:
Tulisan caption pada keempat tombol di atas boleh menggunakan bahasa apapun, selain bahasa Inggris.

"Bitcoin and Forex are high risk business. We must join them smartly."
loading...