Tutorial Image di Tengah Form

Image Form | Tutorial Delphi | Memasukkan image pada form aplikasi yang kita buat, mempunyai berbagai tujuan. Salah satu tujuannya adalah lebih mempercantik form. Pada saat desain form, kita memasukkan image dan diletakkan di tengah form. Tetapi saat ukuran form dirubah (resize), posisinya berubah tidah di tengah lagi, sehingga tampak kurang menarik.

Cara yang bisa dilakukan untuk membuat image tetap di tengah-tengah form adalah dengan memanfaatkan event form onresize . Langkahnya adalah sebagai berikut :

1.   Membuat form dengan memasukkan TImage dan load picture nya.
 

 

2.   Membuka object inspector form.

3.   Pada tab event ==> onresize, klik kiri 2x kolom sebelahnya, sehingga muncul prosedurenya pada delphi unit editor.

4.   Mengisikan program seperti isi prosedure di bawah ini.

procedure TForm1.FormResize(Sender: TObject);

begin

image1.Left:= (width-image1.Width) div 2;

image1.Top:= (height-image1.Height) div 2

end;

5.  Running program dan coba untuk resize form aplikasi, image akan tetap memposisikan di tengah-tengah form.

 

Yaaa…itu hanya sedikit sharing pengalaman, heeeee…Cuma sederhana saja,,,maap yaa…

Salam damai, senajan kenthir nanging kebak pikir

Semoga bermanfaat….