src/msw/printwin.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        printwin.cpp
   3 // Purpose:     wxWindowsPrinter framework
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart and Markus Holzem
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "printwin.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #include "wx/defs.h"
  24
  25 #define WINDOWS_PRINTING    (wxTheApp->GetPrintMode() == wxPRINT_WINDOWS)
  26
  27 #ifndef WX_PRECOMP
  28 #include "wx/utils.h"
  29 #include "wx/dc.h"
  30 #include "wx/app.h"
  31 #include "wx/msgdlg.h"
  32 #endif
  33
  34 #include "wx/msw/printwin.h"
  35 #include "wx/dcprint.h"
  36 #include "wx/printdlg.h"
  37 #include "wx/msw/private.h"
  38
  39 #include <stdlib.h>
  40 #include <windows.h>
  41 #include <commdlg.h>
  42
  43 // Clash with Windows header files
  44 #ifdef StartDoc
  45 #undef StartDoc
  46 #endif
  47
  48 #ifndef __WIN32__
  49 #include <print.h>
  50 #endif
  51
  52 LONG APIENTRY _EXPORT wxAbortProc(HDC hPr, int Code);
  53
  54 #if !USE_SHARED_LIBRARY
  55 IMPLEMENT_DYNAMIC_CLASS(wxWindowsPrinter, wxPrinterBase)
  56 IMPLEMENT_CLASS(wxWindowsPrintPreview, wxPrintPreviewBase)
  57 #endif
  58
  59 /*
  60  * Printer
  61  */
  62
  63 wxWindowsPrinter::wxWindowsPrinter(wxPrintData *data):
  64   wxPrinterBase(data)
  65 {
  66   lpAbortProc = (WXFARPROC) MakeProcInstance((FARPROC) wxAbortProc, wxGetInstance());
  67 }
  68
  69 wxWindowsPrinter::~wxWindowsPrinter(void)
  70 {
  71   FreeProcInstance((FARPROC) lpAbortProc);
  72 }
  73
  74 bool wxWindowsPrinter::Print(wxWindow *parent, wxPrintout *printout, bool prompt)
  75 {
  76   abortIt = FALSE;
  77   abortWindow = NULL;
  78
  79   if (!printout)
  80     return FALSE;
  81
  82   printout->SetIsPreview(FALSE);
  83   printout->OnPreparePrinting();
  84
  85   // Get some parameters from the printout, if defined
  86   int fromPage, toPage;
  87   int minPage, maxPage;
  88   printout->GetPageInfo(&minPage, &maxPage, &fromPage, &toPage);
  89
  90   if (maxPage == 0)
  91     return FALSE;
  92
  93   printData.SetMinPage(minPage);
  94   printData.SetMaxPage(maxPage);
  95   if (fromPage != 0)
  96     printData.SetFromPage(fromPage);
  97   if (toPage != 0)
  98     printData.SetToPage(toPage);
  99
 100   if (minPage != 0)
 101   {
 102     printData.EnablePageNumbers(TRUE);
 103     if (printData.GetFromPage() < printData.GetMinPage())
 104       printData.SetFromPage(printData.GetMinPage());
 105     else if (printData.GetFromPage() > printData.GetMaxPage())
 106       printData.SetFromPage(printData.GetMaxPage());
 107     if (printData.GetToPage() > printData.GetMaxPage())
 108       printData.SetToPage(printData.GetMaxPage());
 109     else if (printData.GetToPage() < printData.GetMinPage())
 110       printData.SetToPage(printData.GetMinPage());
 111   }
 112   else
 113     printData.EnablePageNumbers(FALSE);
 114
 115   // Create a suitable device context
 116   wxDC *dc = NULL;
 117   if (prompt)
 118   {
 119         wxPrintDialog dialog(parent, & printData);
 120         if (dialog.ShowModal() == wxID_OK)
 121         {
 122           dc = dialog.GetPrintDC();
 123           printData = dialog.GetPrintData();
 124         }
 125   }
 126   else
 127   {
 128       dc = new wxPrinterDC("", "", "", FALSE, printData.GetOrientation());
 129   }
 130
 131   // May have pressed cancel.
 132   if (!dc || !dc->Ok())
 133   {
 134     if (dc) delete dc;
 135     return FALSE;
 136   }
 137
 138   int logPPIScreenX = 0;
 139   int logPPIScreenY = 0;
 140   int logPPIPrinterX = 0;
 141   int logPPIPrinterY = 0;
 142
 143   HDC hdc = ::GetDC(NULL);
 144   logPPIScreenX = ::GetDeviceCaps(hdc, LOGPIXELSX);
 145   logPPIScreenY = ::GetDeviceCaps(hdc, LOGPIXELSY);
 146   ::ReleaseDC(NULL, hdc);
 147
 148   logPPIPrinterX = ::GetDeviceCaps((HDC) dc->GetHDC(), LOGPIXELSX);
 149   logPPIPrinterY = ::GetDeviceCaps((HDC) dc->GetHDC(), LOGPIXELSY);
 150   if (logPPIPrinterX == 0 || logPPIPrinterY == 0)
 151   {
 152     delete dc;
 153     return FALSE;
 154   }
 155
 156   printout->SetPPIScreen(logPPIScreenX, logPPIScreenY);
 157   printout->SetPPIPrinter(logPPIPrinterX, logPPIPrinterY);
 158
 159   // Set printout parameters
 160   printout->SetDC(dc);
 161
 162   int w, h;
 163   long ww, hh;
 164   dc->GetSize(&w, &h);
 165   printout->SetPageSizePixels((int)w, (int)h);
 166   dc->GetSizeMM(&ww, &hh);
 167   printout->SetPageSizeMM((int)ww, (int)hh);
 168
 169   // Create an abort window
 170   wxBeginBusyCursor();
 171
 172   wxWindow *win = CreateAbortWindow(parent, printout);
 173   wxYield();
 174
 175 #if defined(__BORLANDC__) || defined(__GNUWIN32__)
 176   ::SetAbortProc((HDC) dc->GetHDC(), (FARPROC) lpAbortProc);
 177 #else
 178   ::SetAbortProc((HDC) dc->GetHDC(), (int (_stdcall *)
 179     // cast it to right type only if required
 180     // @@@ it's really cdecl and we're casting it to stdcall - either there is
 181     //     something I don't understand or it will crash at first usage
 182   #ifdef STRICT
 183     (HDC, int)
 184   #else
 185     ()
 186   #endif
 187     )lpAbortProc);
 188 #endif
 189
 190   if (!win)
 191   {
 192     wxEndBusyCursor();
 193     wxMessageBox("Sorry, could not create an abort dialog.", "Print Error", wxOK, parent);
 194     delete dc;
 195   }
 196   abortWindow = win;
 197   abortWindow->Show(TRUE);
 198   wxYield();
 199
 200   printout->OnBeginPrinting();
 201
 202   bool keepGoing = TRUE;
 203
 204   int copyCount;
 205   for (copyCount = 1; copyCount <= printData.GetNoCopies(); copyCount ++)
 206   {
 207     if (!printout->OnBeginDocument(printData.GetFromPage(), printData.GetToPage()))
 208     {
 209       wxEndBusyCursor();
 210       wxMessageBox("Could not start printing.", "Print Error", wxOK, parent);
 211       break;
 212     }
 213     if (abortIt)
 214       break;
 215
 216     int pn;
 217     for (pn = printData.GetFromPage(); keepGoing && (pn <= printData.GetToPage()) && printout->HasPage(pn);
 218          pn++)
 219     {
 220       if (abortIt)
 221       {
 222         keepGoing = FALSE;
 223         break;
 224       }
 225       else
 226       {
 227 //        int dcID = ::SaveDC(dc->GetHDC());
 228         dc->StartPage();
 229         printout->OnPrintPage(pn);
 230         dc->EndPage();
 231 //        ::RestoreDC(dc->GetHDC(), dcID);
 232       }
 233     }
 234     printout->OnEndDocument();
 235   }
 236
 237   printout->OnEndPrinting();
 238
 239   if (abortWindow)
 240   {
 241     abortWindow->Show(FALSE);
 242     delete abortWindow;
 243     abortWindow = NULL;
 244   }
 245
 246   wxEndBusyCursor();
 247
 248   delete dc;
 249
 250   return TRUE;
 251 }
 252
 253 bool wxWindowsPrinter::PrintDialog(wxWindow *parent)
 254 {
 255   wxPrintDialog dialog(parent, & printData);
 256   return (dialog.ShowModal() == wxID_OK);
 257 }
 258
 259 bool wxWindowsPrinter::Setup(wxWindow *parent)
 260 {
 261   wxPrintDialog dialog(parent, & printData);
 262   dialog.GetPrintData().SetSetupDialog(TRUE);
 263   return (dialog.ShowModal() == wxID_OK);
 264 }
 265
 266 /*
 267  * Print preview
 268  */
 269
 270 wxWindowsPrintPreview::wxWindowsPrintPreview(wxPrintout *printout, wxPrintout *printoutForPrinting, wxPrintData *data):
 271   wxPrintPreviewBase(printout, printoutForPrinting, data)
 272 {
 273   DetermineScaling();
 274 }
 275
 276 wxWindowsPrintPreview::~wxWindowsPrintPreview(void)
 277 {
 278 }
 279
 280 bool wxWindowsPrintPreview::Print(bool interactive)
 281 {
 282   if (!printPrintout)
 283     return FALSE;
 284   wxWindowsPrinter printer(&printData);
 285   return printer.Print(previewFrame, printPrintout, interactive);
 286 }
 287
 288 void wxWindowsPrintPreview::DetermineScaling(void)
 289 {
 290     HDC dc = ::GetDC(NULL);
 291     int screenWidth = ::GetDeviceCaps(dc, HORZSIZE);
 292 //    int screenHeight = ::GetDeviceCaps(dc, VERTSIZE);
 293     int screenXRes = ::GetDeviceCaps(dc, HORZRES);
 294 //    int screenYRes = ::GetDeviceCaps(dc, VERTRES);
 295     int logPPIScreenX = ::GetDeviceCaps(dc, LOGPIXELSX);
 296     int logPPIScreenY = ::GetDeviceCaps(dc, LOGPIXELSY);
 297     previewPrintout->SetPPIScreen(logPPIScreenX, logPPIScreenY);
 298
 299     ::ReleaseDC(NULL, dc);
 300
 301     // Get a device context for the currently selected printer
 302     wxPrinterDC printerDC("", "", "", FALSE, printData.GetOrientation());
 303
 304     int printerWidth = 150;
 305     int printerHeight = 250;
 306     int printerXRes = 1500;
 307     int printerYRes = 2500;
 308
 309     if (printerDC.GetHDC())
 310     {
 311       printerWidth = ::GetDeviceCaps((HDC) printerDC.GetHDC(), HORZSIZE);
 312       printerHeight = ::GetDeviceCaps((HDC) printerDC.GetHDC(), VERTSIZE);
 313       printerXRes = ::GetDeviceCaps((HDC) printerDC.GetHDC(), HORZRES);
 314       printerYRes = ::GetDeviceCaps((HDC) printerDC.GetHDC(), VERTRES);
 315
 316       int logPPIPrinterX = ::GetDeviceCaps((HDC) printerDC.GetHDC(), LOGPIXELSX);
 317       int logPPIPrinterY = ::GetDeviceCaps((HDC) printerDC.GetHDC(), LOGPIXELSY);
 318
 319       previewPrintout->SetPPIPrinter(logPPIPrinterX, logPPIPrinterY);
 320       previewPrintout->SetPageSizeMM(printerWidth, printerHeight);
 321
 322       if (logPPIPrinterX == 0 || logPPIPrinterY == 0 || printerWidth == 0 || printerHeight == 0)
 323         isOk = FALSE;
 324     }
 325     else
 326       isOk = FALSE;
 327
 328     pageWidth = printerXRes;
 329     pageHeight = printerYRes;
 330
 331     // At 100%, the page should look about page-size on the screen.
 332     previewScale = (float)((float)screenWidth/(float)printerWidth);
 333     previewScale = previewScale * (float)((float)screenXRes/(float)printerYRes);
 334 }
 335
 336 /****************************************************************************
 337
 338     FUNCTION: wxAbortProc()
 339
 340     PURPOSE:  Processes messages for the Abort Dialog box
 341
 342 ****************************************************************************/
 343
 344 LONG APIENTRY _EXPORT wxAbortProc(HDC WXUNUSED(hPr), int WXUNUSED(Code))
 345 {
 346     MSG msg;
 347
 348     if (!wxPrinterBase::abortWindow)              /* If the abort dialog isn't up yet */
 349         return(TRUE);
 350
 351     /* Process messages intended for the abort dialog box */
 352
 353     while (!wxPrinterBase::abortIt && PeekMessage(&msg, 0, 0, 0, TRUE))
 354         if (!IsDialogMessage((HWND) wxPrinterBase::abortWindow->GetHWND(), &msg)) {
 355             TranslateMessage(&msg);
 356             DispatchMessage(&msg);
 357         }
 358
 359     /* bAbort is TRUE (return is FALSE) if the user has aborted */
 360
 361     return (!wxPrinterBase::abortIt);
 362 }
 363