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

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:


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