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

   1 #############################################################################
   2 ## Name:        ext/mdi/XS/MDIParentFrame.xs
   3 ## Purpose:     XS for Wx::MDIParentFrame
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     06/09/2001
   7 ## RCS-ID:      $Id: MDIParentFrame.xs 2517 2008-11-30 20:14:22Z mbarbon $
   8 ## Copyright:   (c) 2001-2002, 2004, 2006-2008 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 #if wxPERL_USE_MDI_ARCHITECTURE
  14
  15 #include <wx/menu.h>
  16 #include "cpp/mdi.h"
  17 #include "cpp/overload.h"
  18
  19 MODULE=Wx PACKAGE=Wx::MDIParentFrame
  20
  21 void
  22 new( ... )
  23   PPCODE:
  24     BEGIN_OVERLOAD()
  25         MATCH_VOIDM_REDISP( newDefault )
  26         MATCH_ANY_REDISP( newFull )
  27     END_OVERLOAD( "Wx::MDIParentFrame::new" )
  28
  29 wxMDIParentFrame*
  30 newDefault( CLASS )
  31     PlClassName CLASS
  32   CODE:
  33     RETVAL = new wxPliMDIParentFrame( CLASS );
  34   OUTPUT: RETVAL
  35
  36 wxMDIParentFrame*
  37 newFull( CLASS, parent, id, title, pos = wxDefaultPosition, size = wxDefaultSize, style = wxDEFAULT_FRAME_STYLE|wxVSCROLL|wxHSCROLL, name = wxFrameNameStr )
  38     PlClassName CLASS
  39     wxWindow* parent
  40     wxWindowID id
  41     wxString title
  42     wxPoint pos
  43     wxSize size
  44     long style
  45     wxString name
  46   CODE:
  47     RETVAL = new wxPliMDIParentFrame( CLASS );
  48     RETVAL->Create( parent, id, title, pos, size, style, name );
  49   OUTPUT:
  50     RETVAL
  51
  52 bool
  53 wxMDIParentFrame::Create( parent, id, title, pos = wxDefaultPosition, size = wxDefaultSize, style = wxDEFAULT_FRAME_STYLE|wxVSCROLL|wxHSCROLL, name = wxFrameNameStr )
  54     wxWindow* parent
  55     wxWindowID id
  56     wxString title
  57     wxPoint pos
  58     wxSize size
  59     long style
  60     wxString name
  61
  62 void
  63 wxMDIParentFrame::ActivateNext()
  64
  65 void
  66 wxMDIParentFrame::ActivatePrevious()
  67
  68 void
  69 wxMDIParentFrame::ArrangeIcons()
  70
  71 void
  72 wxMDIParentFrame::Cascade()
  73
  74 wxMDIChildFrame*
  75 wxMDIParentFrame::GetActiveChild()
  76
  77 #ifdef __WXUNIVERSAL__
  78
  79 wxGenericMDIClientWindow*
  80 wxMDIParentFrame::GetClientWindow()
  81
  82 #else
  83 #if WXPERL_W_VERSION_GE( 2, 9, 0 )
  84
  85 wxMDIClientWindowBase*
  86 wxMDIParentFrame::GetClientWindow()
  87
  88 #else
  89
  90 wxMDIClientWindow*
  91 wxMDIParentFrame::GetClientWindow()
  92
  93 #endif
  94 #endif
  95
  96 #if ( !defined(__WXGTK__) && !defined(__WXMAC__) && !defined(__WXMOTIF__) ) \
  97     || defined(__WXPERL_FORCE__)
  98
  99 wxMenu*
 100 wxMDIParentFrame::GetWindowMenu()
 101
 102 void
 103 wxMDIParentFrame::SetWindowMenu( menu )
 104     wxMenu* menu
 105
 106 #endif
 107
 108 #if WXPERL_W_VERSION_GE( 2, 5, 4 )
 109
 110 void
 111 wxMDIParentFrame::Tile( orient = wxHORIZONTAL )
 112     wxOrientation orient
 113
 114 #else
 115
 116
 117 void
 118 wxMDIParentFrame::Tile()
 119
 120 #endif
 121
 122 #endif