Placing A Bitmap In The PropertySheet Button Area

I was recently asked to write an application for a company that wanted their logo on every single window in the program. As the application grew there became less and less space for a company bitmap logo within some of the tabbed-dialog boxes. Due to this I decided to see if I could place the bitmap logo in the PropertySheet area that is normally only used by the the OK, Cancel and Apply buttons. The picture below shows what I achived...

To do this is quite easy.

1. Firstly create a subclass of CPropertySheet called CMyPropertySheet.

2. Override the WM_PAINT message by creating an OnPaint() member function for CMyPropertySheet, and paste the follwing code into it.

CBitmap bmp, *poldbmp;
CDC memdc;
CRect rect;
	
//Load the bitmap resource 
bmp.LoadBitmap(IDB_BITMAPLOGO); 

//Create a compatible memory DC
memdc.CreateCompatibleDC(&dc);

//Select the bitmap into the DC
poldbmp = memdc.SelectObject(&bmp);//bmp

//Get size of PropertySheet
GetClientRect(&rect);

//Copy (BitBlt) bitmap from memory DC to screen DC
dc.BitBlt(left, rect.bottom - lower, w, h, &memdc, 0, 0, SRCCOPY);

memdc.SelectObject(poldbmp);

The dc.BitBlt places a w pixel wide by h pixel high image left pixels away from the left hand edge, and lower pixels away from the bottom of the PropertySheet. Change these values as you see fit.

3. #include "MyPropertSheet.h" in the calling dialog that you wish to use the new property page in.

4. Add PropertyPages to the PropertySheet and call it, e.g.....

    CMyPropertySheet sheet("Personnel Details");
CPerFildlg perfildlgPage;
CAddDetdlg adddetdlgPage;
CDelDetdlg deldetdlgPage;

sheet.AddPage(&perfildlgPage);
sheet.AddPage(&adddetdlgPage);
sheet.AddPage(&deldetdlgPage);

sheet.DoModal();

More advanced code for drawing bitmaps / DIBs which also uses palettes may be found on this site.

Download source - 1KB

Date Posted: 05/04/98