Steps to Reproduce Behavior

1. Start Visual C++ and create a new ATL COM AppWizard project. Name the project AccessTest. Accept the default settings for the wizard.
2. Using Insert|New ATL Object, add a Full Control object to the project. Name the control AccessTestCtrl, and on the Miscellaneous tab, check the Windowed Only check box. From the Stock Properties tab, select Caption and Enabled. Click OK.
3. Press the F7 key to build and register the control.
4. Open Microsoft Access (create a new database if necessary), and add a new Report.
5. With the report in design mode, select More Controls from the Toolbox toolbar and find the AccessTestCtrl item. Add an instance of the ATL control to the report.
6. Save the report and close.
7. Now re-open the Report in preview mode and note that the control does not appear or appears incorrectly.

Back to the top

Building a Workaround

1. Close down Microsoft Access and go back to your ATL project.
2. The check for the metafile is in OnDrawAdvanced. To fix the problem, override this function by adding the following to the control class (in AccessTestCtrl.h) just before the OnDraw function:

   HRESULT OnDrawAdvanced(ATL_DRAWINFO& di)
   {
      BOOL bDeleteDC = FALSE;
      if (di.hicTargetDev == NULL)
      {
         di.hicTargetDev = AtlCreateTargetDC(di.hdcDraw, di.ptd);
         bDeleteDC = (di.hicTargetDev != di.hdcDraw);
      }
      RECTL rectBoundsDP = *di.prcBounds;
   
   // Check for a metafile...
      BOOL bMetafile = GetDeviceCaps(di.hdcDraw, TECHNOLOGY) == DT_METAFILE;
   
   // Changed "if" clause to check both the metafile flag and
   // bounding window RECT passed to IViewObject::Draw...
      if ((!bMetafile) && (di.prcWBounds == NULL))
      {
         ::LPtoDP(di.hicTargetDev, (LPPOINT)&rectBoundsDP, 2);
         SaveDC(di.hdcDraw);
         SetMapMode(di.hdcDraw, MM_TEXT);
         SetWindowOrgEx(di.hdcDraw, 0, 0, NULL);
         SetViewportOrgEx(di.hdcDraw, 0, 0, NULL);
         di.bOptimize = TRUE; //since you save the DC you can do this
      }
   
      di.prcBounds = &rectBoundsDP;
      GetZoomInfo(di);
   
      HRESULT hRes = OnDraw(di);
      if (bDeleteDC)
         ::DeleteDC(di.hicTargetDev);
      if ((!bMetafile) && (di.prcWBounds == NULL))
         RestoreDC(di.hdcDraw, -1);
      return hRes;
   }
   					

3. Recompile the control by pressing the F7 key. Reopen Access, preview the Report made earlier, and note that the control now appears. For example, you should be able to read the caption ("ATL 3.0 : AccessTestCtrl") that you were unable to read before.NOTE: Access might crop the border of the metafile when displaying it.

Back to the top