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 // ===========================================================================
  13 // declarations
  14 // ===========================================================================
  15
  16 // ---------------------------------------------------------------------------
  17 // headers
  18 // ---------------------------------------------------------------------------
  19
  20 #ifdef __GNUG__
  21     #pragma implementation "printwin.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #include "wx/defs.h"
  32
  33 #ifndef WX_PRECOMP
  34     #include "wx/window.h"
  35     #include "wx/msw/private.h"
  36     #include "wx/utils.h"
  37     #include "wx/dc.h"
  38     #include "wx/app.h"
  39     #include "wx/msgdlg.h"
  40     #include "wx/intl.h"
  41 #endif
  42
  43 #include "wx/msw/printwin.h"
  44 #include "wx/dcprint.h"
  45 #include "wx/printdlg.h"
  46 #include "wx/log.h"
  47 #include "wx/msw/private.h"
  48
  49 #include <stdlib.h>
  50
  51 #include "wx/msw/private.h"
  52
  53 #include <commdlg.h>
  54
  55 #ifndef __WIN32__
  56     #include <print.h>
  57 #endif
  58
  59 // ---------------------------------------------------------------------------
  60 // private functions
  61 // ---------------------------------------------------------------------------
  62
  63 LONG APIENTRY _EXPORT wxAbortProc(HDC hPr, int Code);
  64
  65 // ---------------------------------------------------------------------------
  66 // wxWin macros
  67 // ---------------------------------------------------------------------------
  68
  69     IMPLEMENT_DYNAMIC_CLASS(wxWindowsPrinter, wxPrinterBase)
  70     IMPLEMENT_CLASS(wxWindowsPrintPreview, wxPrintPreviewBase)
  71
  72 // ===========================================================================
  73 // implementation
  74 // ===========================================================================
  75
  76 // ---------------------------------------------------------------------------
  77 // Printer
  78 // ---------------------------------------------------------------------------
  79
  80 wxWindowsPrinter::wxWindowsPrinter(wxPrintDialogData *data)
  81                 : wxPrinterBase(data)
  82 {
  83     m_lpAbortProc = (WXFARPROC) MakeProcInstance((FARPROC) wxAbortProc, wxGetInstance());
  84 }
  85
  86 wxWindowsPrinter::~wxWindowsPrinter()
  87 {
  88     // avoids mingw warning about statement with no effect (FreeProcInstance
  89     // doesn't do anything under Win32)
  90 #ifndef __GNUWIN32__
  91     FreeProcInstance((FARPROC) m_lpAbortProc);
  92 #endif
  93 }
  94
  95 bool wxWindowsPrinter::Print(wxWindow *parent, wxPrintout *printout, bool prompt)
  96 {
  97     sm_abortIt = FALSE;
  98     sm_abortWindow = NULL;
  99
 100     if (!printout)
 101         return FALSE;
 102
 103     printout->SetIsPreview(FALSE);
 104
 105     // 4/9/99, JACS: this is a silly place to allow preparation, considering
 106     // the DC and no parameters have been set in the printout object.
 107     // Moved further down.
 108     // printout->OnPreparePrinting();
 109
 110     // Get some parameters from the printout, if defined
 111     int fromPage, toPage;
 112     int minPage, maxPage;
 113     printout->GetPageInfo(&minPage, &maxPage, &fromPage, &toPage);
 114
 115     if (maxPage == 0)
 116         return FALSE;
 117
 118     m_printDialogData.SetMinPage(minPage);
 119     m_printDialogData.SetMaxPage(maxPage);
 120     if (fromPage != 0)
 121         m_printDialogData.SetFromPage(fromPage);
 122     if (toPage != 0)
 123         m_printDialogData.SetToPage(toPage);
 124
 125     if (minPage != 0)
 126     {
 127         m_printDialogData.EnablePageNumbers(TRUE);
 128         if (m_printDialogData.GetFromPage() < m_printDialogData.GetMinPage())
 129             m_printDialogData.SetFromPage(m_printDialogData.GetMinPage());
 130         else if (m_printDialogData.GetFromPage() > m_printDialogData.GetMaxPage())
 131             m_printDialogData.SetFromPage(m_printDialogData.GetMaxPage());
 132         if (m_printDialogData.GetToPage() > m_printDialogData.GetMaxPage())
 133             m_printDialogData.SetToPage(m_printDialogData.GetMaxPage());
 134         else if (m_printDialogData.GetToPage() < m_printDialogData.GetMinPage())
 135             m_printDialogData.SetToPage(m_printDialogData.GetMinPage());
 136     }
 137     else
 138         m_printDialogData.EnablePageNumbers(FALSE);
 139
 140     // Create a suitable device context
 141     wxDC *dc = NULL;
 142     if (prompt)
 143     {
 144         dc = PrintDialog(parent);
 145         if (!dc)
 146             return FALSE;
 147     }
 148     else
 149     {
 150         //      dc = new wxPrinterDC("", "", "", FALSE, m_printData.GetOrientation());
 151         dc = new wxPrinterDC(m_printDialogData.GetPrintData());
 152     }
 153
 154     // May have pressed cancel.
 155     if (!dc || !dc->Ok())
 156     {
 157         if (dc) delete dc;
 158         return FALSE;
 159     }
 160
 161     int logPPIScreenX = 0;
 162     int logPPIScreenY = 0;
 163     int logPPIPrinterX = 0;
 164     int logPPIPrinterY = 0;
 165
 166     HDC hdc = ::GetDC(NULL);
 167     logPPIScreenX = ::GetDeviceCaps(hdc, LOGPIXELSX);
 168     logPPIScreenY = ::GetDeviceCaps(hdc, LOGPIXELSY);
 169     ::ReleaseDC(NULL, hdc);
 170
 171     logPPIPrinterX = ::GetDeviceCaps((HDC) dc->GetHDC(), LOGPIXELSX);
 172     logPPIPrinterY = ::GetDeviceCaps((HDC) dc->GetHDC(), LOGPIXELSY);
 173     if (logPPIPrinterX == 0 || logPPIPrinterY == 0)
 174     {
 175         delete dc;
 176         return FALSE;
 177     }
 178
 179     printout->SetPPIScreen(logPPIScreenX, logPPIScreenY);
 180     printout->SetPPIPrinter(logPPIPrinterX, logPPIPrinterY);
 181
 182     // Set printout parameters
 183     printout->SetDC(dc);
 184
 185     int w, h;
 186     dc->GetSize(&w, &h);
 187     printout->SetPageSizePixels((int)w, (int)h);
 188
 189     dc->GetSizeMM(&w, &h);
 190     printout->SetPageSizeMM((int)w, (int)h);
 191
 192     // Create an abort window
 193     wxBeginBusyCursor();
 194
 195     printout->OnPreparePrinting();
 196
 197     wxWindow *win = CreateAbortWindow(parent, printout);
 198     wxYield();
 199
 200 #if defined(__BORLANDC__) || defined(__GNUWIN32__) || defined(__SALFORDC__) || !defined(__WIN32__)
 201 #ifdef STRICT
 202     ::SetAbortProc((HDC) dc->GetHDC(), (ABORTPROC) m_lpAbortProc);
 203 #else
 204     ::SetAbortProc((HDC) dc->GetHDC(), (FARPROC) m_lpAbortProc);
 205 #endif
 206 #else
 207     ::SetAbortProc((HDC) dc->GetHDC(), (int (_stdcall *)
 208         // cast it to right type only if required
 209         // FIXME it's really cdecl and we're casting it to stdcall - either there is
 210         //       something I don't understand or it will crash at first usage
 211 #ifdef STRICT
 212         (HDC, int)
 213 #else
 214         ()
 215 #endif
 216         )m_lpAbortProc);
 217 #endif
 218
 219     if (!win)
 220     {
 221         wxEndBusyCursor();
 222         wxLogDebug(wxT("Could not create an abort dialog."));
 223
 224         delete dc;
 225     }
 226     sm_abortWindow = win;
 227     sm_abortWindow->Show(TRUE);
 228     wxSafeYield();
 229
 230     printout->OnBeginPrinting();
 231
 232     int copyCount;
 233     for ( copyCount = 1;
 234           copyCount <= m_printDialogData.GetNoCopies();
 235           copyCount++ )
 236     {
 237         if (!printout->OnBeginDocument(m_printDialogData.GetFromPage(), m_printDialogData.GetToPage()))
 238         {
 239             wxEndBusyCursor();
 240             wxLogError(_("Could not start printing."));
 241             break;
 242         }
 243         if (sm_abortIt)
 244             break;
 245
 246         int pn;
 247         for ( pn = m_printDialogData.GetFromPage();
 248               pn <= m_printDialogData.GetToPage() && printout->HasPage(pn);
 249               pn++ )
 250         {
 251             if ( sm_abortIt )
 252             {
 253                 break;
 254             }
 255
 256             dc->StartPage();
 257             bool cont = printout->OnPrintPage(pn);
 258             dc->EndPage();
 259
 260             if ( !cont )
 261                 break;
 262         }
 263
 264         printout->OnEndDocument();
 265     }
 266
 267     printout->OnEndPrinting();
 268
 269     if (sm_abortWindow)
 270     {
 271         sm_abortWindow->Show(FALSE);
 272         delete sm_abortWindow;
 273         sm_abortWindow = NULL;
 274     }
 275
 276     wxEndBusyCursor();
 277
 278     delete dc;
 279
 280     return TRUE;
 281 }
 282
 283 wxDC* wxWindowsPrinter::PrintDialog(wxWindow *parent)
 284 {
 285     wxDC* dc = (wxDC*) NULL;
 286
 287     wxPrintDialog dialog(parent, & m_printDialogData);
 288     int ret = dialog.ShowModal();
 289
 290     if (ret == wxID_OK)
 291     {
 292         dc = dialog.GetPrintDC();
 293         m_printDialogData = dialog.GetPrintDialogData();
 294     }
 295
 296     return dc;
 297 }
 298
 299 bool wxWindowsPrinter::Setup(wxWindow *parent)
 300 {
 301     wxPrintDialog dialog(parent, & m_printDialogData);
 302     dialog.GetPrintDialogData().SetSetupDialog(TRUE);
 303
 304     int ret = dialog.ShowModal();
 305
 306     if (ret == wxID_OK)
 307     {
 308         m_printDialogData = dialog.GetPrintDialogData();
 309     }
 310
 311     return (ret == wxID_OK);
 312 }
 313
 314 /*
 315 * Print preview
 316 */
 317
 318 wxWindowsPrintPreview::wxWindowsPrintPreview(wxPrintout *printout,
 319                                              wxPrintout *printoutForPrinting,
 320                                              wxPrintDialogData *data)
 321                      : wxPrintPreviewBase(printout, printoutForPrinting, data)
 322 {
 323     DetermineScaling();
 324 }
 325
 326 wxWindowsPrintPreview::wxWindowsPrintPreview(wxPrintout *printout,
 327                                              wxPrintout *printoutForPrinting,
 328                                              wxPrintData *data)
 329                      : wxPrintPreviewBase(printout, printoutForPrinting, data)
 330 {
 331     DetermineScaling();
 332 }
 333
 334 wxWindowsPrintPreview::~wxWindowsPrintPreview()
 335 {
 336 }
 337
 338 bool wxWindowsPrintPreview::Print(bool interactive)
 339 {
 340     if (!m_printPrintout)
 341         return FALSE;
 342     wxWindowsPrinter printer(&m_printDialogData);
 343     return printer.Print(m_previewFrame, m_printPrintout, interactive);
 344 }
 345
 346 void wxWindowsPrintPreview::DetermineScaling()
 347 {
 348     HDC dc = ::GetDC(NULL);
 349     int screenWidth = ::GetDeviceCaps(dc, HORZSIZE);
 350     //    int screenHeight = ::GetDeviceCaps(dc, VERTSIZE);
 351     int screenXRes = ::GetDeviceCaps(dc, HORZRES);
 352     //    int screenYRes = ::GetDeviceCaps(dc, VERTRES);
 353     int logPPIScreenX = ::GetDeviceCaps(dc, LOGPIXELSX);
 354     int logPPIScreenY = ::GetDeviceCaps(dc, LOGPIXELSY);
 355     m_previewPrintout->SetPPIScreen(logPPIScreenX, logPPIScreenY);
 356
 357     ::ReleaseDC(NULL, dc);
 358
 359     // Get a device context for the currently selected printer
 360     wxPrinterDC printerDC(m_printDialogData.GetPrintData());
 361
 362     int printerWidth = 150;
 363     int printerHeight = 250;
 364     int printerXRes = 1500;
 365     int printerYRes = 2500;
 366
 367     if (printerDC.GetHDC())
 368     {
 369         printerWidth = ::GetDeviceCaps((HDC) printerDC.GetHDC(), HORZSIZE);
 370         printerHeight = ::GetDeviceCaps((HDC) printerDC.GetHDC(), VERTSIZE);
 371         printerXRes = ::GetDeviceCaps((HDC) printerDC.GetHDC(), HORZRES);
 372         printerYRes = ::GetDeviceCaps((HDC) printerDC.GetHDC(), VERTRES);
 373
 374         int logPPIPrinterX = ::GetDeviceCaps((HDC) printerDC.GetHDC(), LOGPIXELSX);
 375         int logPPIPrinterY = ::GetDeviceCaps((HDC) printerDC.GetHDC(), LOGPIXELSY);
 376
 377         m_previewPrintout->SetPPIPrinter(logPPIPrinterX, logPPIPrinterY);
 378         m_previewPrintout->SetPageSizeMM(printerWidth, printerHeight);
 379
 380         if (logPPIPrinterX == 0 || logPPIPrinterY == 0 || printerWidth == 0 || printerHeight == 0)
 381             m_isOk = FALSE;
 382     }
 383     else
 384         m_isOk = FALSE;
 385
 386     m_pageWidth = printerXRes;
 387     m_pageHeight = printerYRes;
 388
 389     // At 100%, the page should look about page-size on the screen.
 390     m_previewScale = (float)((float)screenWidth/(float)printerWidth);
 391     m_previewScale = m_previewScale * (float)((float)screenXRes/(float)printerYRes);
 392 }
 393
 394 /****************************************************************************
 395
 396   FUNCTION: wxAbortProc()
 397
 398     PURPOSE:  Processes messages for the Abort Dialog box
 399
 400 ****************************************************************************/
 401
 402 LONG APIENTRY _EXPORT wxAbortProc(HDC WXUNUSED(hPr), int WXUNUSED(Code))
 403 {
 404     MSG msg;
 405
 406     if (!wxPrinterBase::sm_abortWindow)              /* If the abort dialog isn't up yet */
 407         return(TRUE);
 408
 409     /* Process messages intended for the abort dialog box */
 410
 411     while (!wxPrinterBase::sm_abortIt && PeekMessage(&msg, 0, 0, 0, TRUE))
 412         if (!IsDialogMessage((HWND) wxPrinterBase::sm_abortWindow->GetHWND(), &msg)) {
 413             TranslateMessage(&msg);
 414             DispatchMessage(&msg);
 415         }
 416
 417         /* bAbort is TRUE (return is FALSE) if the user has aborted */
 418
 419         return (!wxPrinterBase::sm_abortIt);
 420 }
 421