- Kita buka Delphi di komputer anda masing masing
- Pada form1 kita klik 1 kali >> Ke tab >> Events >> kita pilih >>OnMouseDown >> Klik 2 kali lalu lita isikan coding berikut ini tepat di bawah >> begin. ReleaseCapture; Perform(WM_SYSCOMMAND, $F012, 0); Seperti yang terlihat pada gambar berikut ini :
- Kita menuju Form 1 lagi Ke tab >> Events >> kita Pilih >> OnCreate >> klik 2 kali kita tambahkan Coding berikut ini : form1.BorderStyle:=bsnone; Seperti yang terlihat pada gambar berikut ini :
- Kita bikin 3 Button Seperti gambar berikut ini :
- Diantara ketiga button Tersebut Kita isi Captions >> minimize , maximize / close Seperti gambar berikut ini :
- Untuk selanjutnya Klik 2 kali pada Button1 / tombol >>> Minimize >> kita kasih Coding Berikut Ini tepat di bawah begin : windowstate:=wsminimized; Seperti pada gambar berikut ini :
- Untuk slanjutnya Klik 2 kali pada Button 2 / maximize >> Kita kasih Coding berikut ini tepat di bawah begin > windowstate:=wsmaximized;
- Untuk Button 3 /tombol Close masih sama klik 2 kali >> kita tambahkan coding beriut tepat di bawah begin >> Close; Dan liahat hasilnya >>>
Rz
Agustus 11, 2015
Membuat tombol minimize , maximize dan close pada delphi
Buka Komentar
Tutup Komentar
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar