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

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