Form - Bitmap de fundo

procedure TForm1. FormCreate(Sender:Tobject); 

begin 

    grafico:= TBitmap.Create; 

    grafico.LoadFromFile ('C:\netsys\netsys.bmp'); 

end; 

procedure TForm1.FormPaint(Sender:TObject); 

begin 

   Form1.Canvas.Draw(0,0,grafico); 

end;