This procedure loads a bitmap image from a file and displays it to a VCL form.

1. Create a VCL form with a button control.
2. Provide a bitmap image.
3. Code the button's onClick event handler to load and display a bitmap image.
4. Build and run the application.

1. Choose FileNewOtherDelphi Projects or C++Builder Projects and double-click the VCL Forms Application icon. The VCL Forms Designer is displayed.
2. From the Standard page of the Tool Palette, place a TButton component on the form.

1. Create a directory in which to store your project files.
2. Locate a bitmap image on your local drive, and copy it to your project directory.
3. Save all files in your project to your project directory.

1. In the Object Inspector, double-click the Button1 OnClick event on the Events tab. The Code Editor displays with the cursor in the TForm1.Button1Click (Delphi) or TForm1::Button1Click (C++) event handler block.
2. Enter the following event handling code, replacing MyFile.bmp with path to the bitmap image in your project directory:

Bitmap := TBitmap.Create;
try
  Bitmap.LoadFromFile('MyFile.bmp');
  Form1.Canvas.Brush.Bitmap := Bitmap;
  Form1.Canvas.FillRect(Rect(0,0,100,100));
finally
  Form1.Canvas.Brush.Bitmap := nil;
  Bitmap.Free;
end;

Graphics::TBitmap *Bitmap = new Graphics::TBitmap();
try {
  Bitmap->LoadFromFile( "..\\MyFile.bmp" );
  Form1->Canvas->Brush->Bitmap = Bitmap;
  Form1->Canvas->FillRect( Rect(0,0,100,100) );
} __finally {
  Form1->Canvas->Brush->Bitmap = NULL;
  Bitmap->Free();
}

3. For Delphi, add the following variable declaration in the var block:

Bitmap : TBitmap;

1. Select RunRun.
2. Click the button to display the image bitmap in a 100 x 100-pixel rectangle in the upper left corner of the form.