Membuat orang-orangan menggunakan Delphi 7

Kali ini saya akan membagikan bagai mana cara membuat orang-orangan menggunakan Delphi ,sebelemu itu kalian harus bisa menentukan dimana letak kordinat dari masing masing titik yang akan saling terhubung yang akan membentuk garis ,tanpa basa basi lagi langsung saja ke cara pembuatannya

1. Buka aplikasi Delphi kalian setelah itu new project atau jika sudah pernah membuat new projek tidak masalah menggunakan projct yang lama
2. lalu buat form baru dan tambahkan 1 buah button 
   
3. Klik 2 kali button yang di tambah tadi dan masukan kode ini 

• //kepala
• Canvas.Ellipse(100,50,200,150);
• //tubuh
• Canvas.Polyline([point(150,150),point(150,250)]);
• //tangan kanan
• Canvas.Polyline([point(150,165),point(250,225)]);
• //tangan kiri
• Canvas.Polyline([point(50,225),point(150,165)]);
• //kaki kanan
• Canvas.Polyline([point(150,250),point(250,350)]);
• //kaki kiri
• Canvas.Polyline([point(150,250),point(50,350)]);

 4.run aplikasi dan hasilnya akan seperti ini: