Hello Katabah!
Pada tutorial ini, saya
membuat Tombol Close, Minimize dan Maximize menggunakan komponen SpeedButton. Tombol-tombol
ini biasanya digunakan ketika kita ingin menyembunyikan Title Bar, Tombol
Close, Minimize dan Maximize bawaan Delphi.
Mari kita awali dengan
membuat desain tombol Minimize:
1. Buka Delphi 7
2. Klik Additional pada
Component Pallete
3. Klik SpeedButton
4. Klik area kosong pada
form
5. Muncullah SpeedButton1
6. Klik Caption pada
Object Inspector – Properties
7. Ketik: - (tanda minus
untuk tombol minimize)
8. Masih di Properties,
klik tanda + pada font
9. Klik Size
10. Ketik: 20 (awalnya
8)
11. Sekarang tanda minus
(-) pada SpeedButton1 sudah tampak besar
Selanjutnya kita membuat
desain tombol Maximize:
12. Klik lagi Additional
pada Component Pallete
13. Klik SpeedButton
14. Klik area kosong
pada form
15. Muncullah
SpeedButton2
16. Klik Caption pada
Object Inspector – Properties
17. Ketik: + (tanda plus
untuk tombol maximize)
18. Masih di Properties,
klik tanda + pada font
19. Klik Size
20. Ketik: 20 (awalnya
8)
21. Sekarang tanda plus
(+) pada SpeedButton2 sudah tampak besar
Kemudian, kita buat
desain tombol Close yang berfungsi untuk menutup aplikasi. Mari lanjutkan
dengan langkah-langkah berikut ini:
22. Klik lagi Additional
pada Component Pallete
23. Klik SpeedButton
24. Klik area kosong
pada form
25. Muncullah
SpeedButton3
26. Klik Caption pada
Object Inspector – Properties
27. Ketik: X (tanda silang
atau huruf x untuk tombol close)
28. Masih di Properties,
klik tanda + pada font
29. Klik Size
30. Ketik: 18 (awalnya
8)
31. Sekarang tanda
silang (x) pada SpeedButton3 sudah tampak besar
Sampai langkah 31,
tombol-tombol tersebut belum berfungsi. Oleh karena itu, kita tambahkan
script-nya.
32. Klik dua kali tombol
– (SpeedButton1)
33. Ketik script ini:
Application.Minimize;
34. Klik dua kali tombol
+ (SpeedButton2)
35. Ketik script ini:
Form1.WindowState:=wsMaximized;
36. Klik dua kali tombol
x (SpeedButton3)
37. Ketik script ini:
Application.Terminate;
38. Jalankan program
dengan menekan F9 di keyboard. Kemudian, klik masing-masing tombol di atas.
Nikmati hasilnya…! He..he..
Ini tampilan desainnya:
|
"Boleh Konsultasi Masuk Jurusan Sistem Informasi via IG atau Tiktok."
|
|
Tips Skripsi Program Studi Sistem Informasi |
|
|
