git.maemo.org Git - pkg-perl/blob - deb-src/libwx-perl/libwx-perl-0.96/XS/Toolbook.xsp

   1 #############################################################################
   2 ## Name:        XS/Toolbook.xsp
   3 ## Purpose:     XS++ for Wx::Toolbook
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     30/07/2006
   7 ## RCS-ID:      $Id: Toolbook.xsp 2079 2007-07-08 21:18:04Z mbarbon $
   8 ## Copyright:   (c) 2006 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};
  14
  15 %typemap{wxToolbook*}{simple};
  16
  17 %{
  18 #if WXPERL_W_VERSION_GE( 2, 7, 0 )
  19
  20 #include <wx/toolbar.h>
  21 #include <wx/toolbook.h>
  22 %}
  23
  24 %name{Wx::Toolbook} class wxToolbook
  25 {
  26     %name{newDefault} wxToolbook()
  27         %code{% RETVAL = new wxToolbook();
  28                 wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  29              %};
  30     %name{newFull} wxToolbook(wxWindow *parent,
  31                               wxWindowID id = wxID_ANY,
  32                               const wxPoint& pos = wxDefaultPosition,
  33                               const wxSize& size = wxDefaultSize,
  34                               long style = 0,
  35                               const wxString& name = wxEmptyString)
  36         %code{% RETVAL = new wxToolbook( parent, id, pos, size, style, name );
  37                 wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  38              %};
  39
  40     bool Create(wxWindow *parent,
  41                 wxWindowID id = wxID_ANY,
  42                 const wxPoint& pos = wxDefaultPosition,
  43                 const wxSize& size = wxDefaultSize,
  44                 long style = 0,
  45                 const wxString& name = wxEmptyString);
  46
  47     wxToolBarBase* GetToolBar();
  48     void Realize();
  49 };
  50
  51 %{
  52 void
  53 new( ... )
  54   PPCODE:
  55     BEGIN_OVERLOAD()
  56         MATCH_VOIDM_REDISP( newDefault )
  57         MATCH_ANY_REDISP( newFull )
  58     END_OVERLOAD( "Wx::Toolbook::new" )
  59 %}
  60
  61 %{
  62 #endif
  63 %}