git.maemo.org Git - pkg-perl/blob - deb-src/libwx-perl/libwx-perl-0.96/ext/print/XS/PrintDialog.xs

   1 #############################################################################
   2 ## Name:        ext/print/XS/PrintDialog.xs
   3 ## Purpose:     XS for Wx::PrintDialog
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     02/06/2001
   7 ## RCS-ID:      $Id: PrintDialog.xs 2057 2007-06-18 23:03:00Z mbarbon $
   8 ## Copyright:   (c) 2001, 2004 Mattia Barbon
   9 ## Licence:     This program is free software; you can redistribute it and/or
  10 ##              modify it under the same terms as Perl itself
  11 #############################################################################
  12
  13 #include <wx/printdlg.h>
  14 #include <wx/dc.h>
  15
  16 MODULE=Wx PACKAGE=Wx::PrintDialog
  17
  18 wxPrintDialog*
  19 wxPrintDialog::new( parent, data = 0 )
  20     wxWindow* parent
  21     wxPrintDialogData* data
  22
  23 wxPrintDialogData*
  24 wxPrintDialog::GetPrintDialogData()
  25   CODE:
  26     RETVAL = new wxPrintDialogData( THIS->GetPrintDialogData() );
  27   OUTPUT:
  28     RETVAL
  29
  30 wxDC*
  31 wxPrintDialog::GetPrintDC()