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