Pikiran-pikiran lepas dari London (7)

MENGGAMBAR PAKAI CSHARP

Ternyata menggambar pakai object oriented language seperti Csharp sangatlah repot. Setiap bagian gambar harus didefinisikan sizenya, tempatnya, warnanya, dan bentuknya seperti pada program berikut ini:

using System.Windows.Forms;

using System.Drawing;

class Gambar:System.Windows.Forms.Form

{

    public static void Main()

    { 

    System.Windows.Forms.Application.Run(new Gambar());

    }

    protected override void OnPaint(System.Windows.Forms.PaintEventArgs gbr)

    {

/////// beri nama gambar g

    System.Drawing.Graphics 

      g=gbr.Graphics;

////// siapkan kanvas

    System.Drawing.Rectangle 

      Kanvas=this.ClientRectangle;

    

    // siapkan warna kuas kuning

    System.Drawing.Brush 

      WarnaKanvas=new System.Drawing.SolidBrush(System.Drawing.Color.Yellow);

    // warnai kanvas jadi kuning

    g.FillRectangle(WarnaKanvas,Kanvas);

    // siapkan pena untuk menggambar berwarna merah

    System.Drawing.Pen 

      pena1=new System.Drawing.Pen(System.Drawing.Color.Red);

   // siapkan pena untuk menggambar berwarna hijau

    System.Drawing.Pen 

      pena2=new System.Drawing.Pen(System.Drawing.Color.Green);

////// Bagian 1 Gambar: lingkaran kecil warna merah

    //ini ukuran gambar

    System.Drawing.SizeF 

      ukuran1=new System.Drawing.SizeF();

    ukuran1.Height=100; // tinggi gambar

    ukuran1. Width=100; // lebar gambar

    //tempat ujung kiri atas gambar

    System.Drawing.PointF 

      titik1=new System.Drawing.PointF();

    titik1.X=10; //10 piksel dari kiri

    titik1.Y=10; //10 piksel dari atas

    // namanya gambar1

    System.Drawing.RectangleF 

      gambar1 =new System.Drawing.RectangleF(titik1,ukuran1);

    // gambarnya adalah oval

    g.DrawEllipse(pena1,gambar1);

////// Bagian 2 gambar: oval besar warna hijau

    System.Drawing.SizeF 

      ukuran2=new System.Drawing.SizeF();

    ukuran2.Height=100; // tinggi gambar

    ukuran2. Width=200; // lebar gambar

    //tempat ujung kiri atas gambar

    System.Drawing.PointF 

      titik2=new System.Drawing.PointF();

    titik2.X=70;

    titik2.Y=70;

    // namanya gambar2

    System.Drawing.RectangleF 

      gambar2 =new System.Drawing.RectangleF(titik2,ukuran2);

   

    // gambarnya adalah ovalhijau

      g.DrawEllipse(pena2,gambar2);

////// Bagian 3 gambar: tulisan

    // ini tulisannya

      g.DrawString(

         "Ini gambar pertama saya :)", 

         new Font("Arial", 15),

         Brushes.Green, 30, 200);  

    }    

}