Hello Katabah!
Tampilan bawaan dari
Delphi 7, form itu biasanya berbentu persegi atau kotak. Akan tetapi, kita bisa
membuat variasi bentuk form tersebut, misalnya berbentuk lingkaran.
Mari kita praktekkan…!
1. Buka Delphi 7
2. Klik Button di
kategori Standard dari Component Pallete
3. Letakkan Button
tersebut di form kosong
4. Klik Button1 yang ada
di form
5. Klik Caption pada
Properties (Object Inspector)
6. Ketik: Keluar
7.Klik Left pada
Properties (Object Inspector)
8. Ketik: 126
9. Sekarang tombol
Button1 sudah berubah teksnya menjadi “Keluar”
10. Klik dua kali tombol
Keluar
11. Ketik script ini:
Application.Terminate;
12. Kembali ke form
design (F12)
13. Klik dua kali di
area kosong pada form
14. Ketik script berikut
ini:
var
l:HRGN;
begin
l:=CreateEllipticRgn(30,30,300,300);
SetWindowRgn(handle,l,true);
DeleteObject(l);
15. Jalankan program
dengan menekan tombol F9 di keyboard
Jreng-jreng…..sekarang,
formnya sudah berbentuk lingkaran alias bulat. Iya kan…?
Agar lebih keren,
silahkan ubah warna formnya dengan warna lain, seperti: merah, kuning, hijau
atau warna kesukaanmu. Cara mewarnai form sudah saya jelaskan di tutorial lain.
|
"Boleh Konsultasi Masuk Jurusan Sistem Informasi via IG atau Tiktok."
|
|
Tips Skripsi Program Studi Sistem Informasi |
|
|
