Prodi Sistem Informasi | Belajar HTML dan PHP | Skripsi SI
Pesantren Katabah
1000 Penghafal Quran
Pengobatan Ruqyah Mandiri
Sistem Informasi (S1)
Manajemen Informatika
Blog | Kontak | Siap Kerja | Sertifikat | PrivacyPolicy | Inggris Arab | Daftar Isi

Thursday, March 17, 2016

Membuat Canvas Kotak dan Lonjong Delphi 7



Hello Katabah!
Dengan form Delphi, kita dapat membuat kotak persegi dan lingkaran berbentuk lonjong hanya dengan langkah singkat saja.


1. Buka Delphi 7
2. Klik area kosong pada form
3. Klik Events pada Object Inspectors
4. Klik dua kali pada OnPaint
5. Ketik script ini:
canvas.Rectangle(
    0,0, ClientWidth div 2, ClientHeight div 2);

6. Jalankan program dengan menekan tombol F9
7. Hasilnya: ada kotak berbentuk persegi pada form
8. Kembali ke posisi form design
9. Di bawah script langkah nomor 5, tambahkan script ini:
Canvas.Ellipse(
    ClientWidth div 2, 0, ClientWidth, ClientHeight div 2);

10. Jalankan lagi program dengan tombol F9
11. Sekarang akan muncul kotak persegi dan lingkaran lonjong pada form seperti gambar ini:

"Boleh Konsultasi Masuk Jurusan Sistem Informasi via IG atau Tiktok."
Tips Skripsi Program Studi Sistem Informasi