Seputar Ilmu

Jika pada posisi perintah sebagaimana contoh ke-tiga dari rangkaian ini dipanggil: make_3Dbar_graph, maka akan diperoleh grafik batang 3D. prosedur ini memanfaatkan sebuah rangkaian titik sebagaimana membuat diagram garis. perhatikan, bahwa untuk ke titik lebih atas, y harus dikurang, dan saya menggunakan pengurang sebesar 2 satuan pixel. “bayang-bayang” gambar diletakkan di sebelah kanan. Perhatikan prosedur untuk membuat gambar 3D berikut: procedure make_3dbar_graph; var k,x1,y1,x2,y2:integer; begin //w:= 4; //4 pixel for k:= 1 to length(GraphPoints)-1 do begin x1:= GraphPoints[k].X-3; x2:= GraphPoints[k].X+3; y1:= GraphPoints[k].Y; y2:= MostBottom; cv.Rectangle(x1,y1,x2,y2) ; // cv.polyline([point(x1,y1),point(x1+2,y1-2),point(x2+2,y1-2),point(x2,y1)]); cv.Polyline([point(x2,y1),point(x2+2,y1-2),point(x2+2,y2-2),point(x2,y2)]); end; end;

Buat para temen-temen yang ingin memper indah atau membuat lebih menarik Blognya dengan tampilan Efek Hati Berjatuhan, ada nih caranya, mudah kok tinggal ikutin langkah-langkah yang ada dibawah ini : Pastikan Anda masuk ke akun Blogger Anda Klik rancangan yang ada disebelah kanan atas blog Kemudian klik Edit Html   Cari bagian </body> atau agar lebih mudahnya kalian tekan Ctrl + F , lalu tekan </body> untuk mempermudah pencarian Langkah berikutnya Copy dan Paste kode dibawah ini: <script src='http://sites.google.com/site/anasku2000/lovingheart.js'> </script>    Tepat dibawah/disamping </body>   Klik Save Template Lalu lihat blog Anda telah bertaburan dengan cinta Selamat mencoba dan berkreasi,......