Tampilan Form aplikasi menarik Delphi 7

Salah satu cara membuat aplikasi yang kita buat menjadi lebih menarik adalah dengan cara membuat tampilan form aplikasi. Dengan form aplikasi yang menarik, akan membuat user aplikasi akan lebih nyaman dan tidak bosan dalam menggunakan aplikasi yang anda buat. Untuk membuat tampilan form tidaklah sulit, yang pertama harus kita lakukan adalah dengan membuat gambar tampilan menggunakan photoshop, corel ataupun aplikasi editing gambar lainnya. Gambarlah sesuai dengan imajinasi anda dan simpan dengan format .bmp.

Contoh gambar form aplikasi :

Untuk memasang gambar yang kita buat pada form Delphi, lakukan langkah-langkah berikut : 

1. Buka aplikasi yang telah dibuat, jika belum ada buat aplikasi baru.
2. Klik pada form, atur propertiesnya sebagai berikut :

AlphaBlend : True

BorderStyle : BsNone

Color : clBtnFace

Position : poDekstopCenter

TransparentColor : True

TransparenColorValue : clBackground

3. Klik 2x pada form, setelah muncul jendela editor, tuliskan kode berikut :

procedure TForm1.FormCreate(Sender: TObject);

begin

TransparentColorValue:=image1.Canvas.Pixels [0,0];

end;  
 
4. Tambahkan komponen Timage pada form, atur lebar tingginya sesuai dengan form yang kita buat kemudian atur propertiennya sebagai berikut :

Picture : masukkan gambar yang sudah kita buat

Transparent : True

5. Klik pada komponen TImage, pada event klik 2x pada OnMouseDown. Tuliskan kode program berikut   agar form yang kita buat bisa digeser-geser.

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,

  Y: Integer);

Begin

ReleaseCapture;

Perform(WM_SYSCOMMAND,$F012,0);

end;

6. Running atau jalankan program. Berikut adalah contoh form aplikasi setelah dijalankan :

<<<>>>