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

   1 #############################################################################
   2 ## Name:        ext/docview/XS/DocParentFrame.xs
   3 ## Purpose:     XS for wxDocParentFrame (Document/View Framework)
   4 ## Author:      Simon Flack
   5 ## Modified by:
   6 ## Created:     11/09/2002
   7 ## RCS-ID:      $Id: DocParentFrame.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 MODULE=Wx PACKAGE=Wx::DocParentFrame
  14
  15 wxDocParentFrame *
  16 wxDocParentFrame::new( manager, frame, id, title, pos = wxDefaultPosition, size = wxDefaultSize, style = wxDEFAULT_FRAME_STYLE, name = wxFrameNameStr)
  17     wxDocManager* manager
  18     wxFrame* frame
  19     wxWindowID id
  20     wxString title
  21     wxPoint pos
  22     wxSize size
  23     long style
  24     wxString name
  25   CODE:
  26     RETVAL=new wxPliDocParentFrame(CLASS, manager, frame, id, title, pos, size, style, name);
  27   OUTPUT:
  28     RETVAL
  29
  30 ## Some event stuff missing here
  31
  32 wxDocManager*
  33 wxDocParentFrame::GetDocumentManager()
  34