Blog | Beli Rumah | Belajar HTML dan PHP | Kontak | Gmail | Uang Adsense
Audit Sistem Informasi
Sistem Informasi (S1)
Manajemen Informatika
Komputer dan Pendidikan
Pengobatan Ruqyah
Daftar Isi | Skripsi SI | B. Arab | Sertifikat Komputer Internasional | PrivacyPolicy | Inggris Arab

Wednesday, March 23, 2016

Membuat Title Bar Sendiri Delphi 7



Hello Katabah!
Title Bar atau Caption Bar biasanya berada di bagian atas sebuah aplikasi. Jika kita membuka dokumen pada Microsoft Word, maka title bar biasanya menampilkan file name yang diketik pada saat penyimpanan.


1. Buka Delphi 7
2. Klik Additional pada Component Pallete
3. Klik Shape
4. Klik are kosong pada form
5. Shape kosong akan muncul
6. Atur ukuran Shape pada Object Inspector – Properties:
- Width: 190
- Height: 30
- Left: 90

7. Klik Standard pada Componen Pallete
8. Klik Label
9. Klik di atas Shape1 pada form
10. Klik Caption pada Object Inspector – Properties
11. Ketik: katabah.com (atau judul lain yang Anda inginkan)
12. Klik dua kali area kosong pada form
13. Ketik script ini:
var
  belah:HRGN;
begin
  belah:=CreateEllipticRgn(80,-300,300,300);
  SetWindowRgn(handle,belah,true);
  DeleteObject(belah)

14. Kembali ke form Design (F12)
15. Klik Color pada Object Inspector – Properties
16. Pilih clYellow
17. Jalankan program dengan menekan F9 di keyboard
18. Hasilnya akan seperti ini:

"Investasi Emas dan Reksadana, Untung Mana?."
Youtube: Katabah Com: Menuju 1 jt Konten :)