[marcoszorrilla]

También puedes cargarlo de esta manera:

Código Delphi [-]
procedure TfrMenu.FormCreate(Sender: TObject);
begin
  bmpFondo := TBitmap.Create;
  BmpFondo.LoadFromFile(ExtractFilePath(Application.ExeName)+'Xxxxx.bmp');
end;

procedure TfrMenu.FormPaint(Sender: TObject);
begin
Canvas.Draw( 130, 200, bmpFondo );
end;

procedure TfrMenu.FormDestroy(Sender: TObject);
begin
 bmpFondo.Free;
end;

Un Saludo.