Membuat latar Belakang Dengan gambar

//Membuat latar Belakang Dengan gambar , tanpa menggunakan komponen

//Masukkan Kode Kedalam Form event onpaint ...


procedure TForm1.FormPaint(Sender: TObject);
var a:TBitmap ;
begin
a:=TBitmap.Create ;
a.LoadFromFile('C:\Users\Indra\Desktop\foto.bmp') ;
Canvas.Draw(0,0,a);
end;


//Untuk Latar Belakang form harus menggunakan extensi Bitmap (bmp) ...
//adapun untuk berekstensi Jpg seperti dibawah ini
//Sebelumnya tambahkan (JPEG) di uses , berada paling atas code ...


procedure TForm1.FormPaint(Sender: TObject);
var a:Tpicture ;
begin
a:=TPicture.Create(nil) ;
a.LoadFromFile('C:\Users\Indra\Desktop\foto.jpg') ;
a.parent := form1 ;
a.visible:=true ;
end;