vcs.maemo.org Git - pkg-perl/blob - deb-src/libwx-perl/libwx-perl-0.96/XS/StaticBox.xs

   1 #############################################################################
   2 ## Name:        XS/StaticBox.xs
   3 ## Purpose:     XS for Wx::StaticBox
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     08/11/2000
   7 ## RCS-ID:      $Id: StaticBox.xs 2057 2007-06-18 23:03:00Z mbarbon $
   8 ## Copyright:   (c) 2000-2001, 2003 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/statbox.h>
  14
  15 MODULE=Wx PACKAGE=Wx::StaticBox
  16
  17 wxStaticBox*
  18 wxStaticBox::new( parent, id, label, pos = wxDefaultPosition, size = wxDefaultSize, style = 0, name = wxStaticBoxNameStr )
  19     wxWindow* parent
  20     wxWindowID id
  21     wxString label
  22     wxPoint pos
  23     wxSize size
  24     long style
  25     wxString name
  26   CODE:
  27     RETVAL = new wxStaticBox( parent, id, label, pos,
  28         size, style, name );
  29     wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  30   OUTPUT:
  31     RETVAL
  32
  33 bool
  34 wxStaticBox::Create( parent, id, label, pos = wxDefaultPosition, size = wxDefaultSize, style = 0, name = wxStaticBoxNameStr )
  35     wxWindow* parent
  36     wxWindowID id
  37     wxString label
  38     wxPoint pos
  39     wxSize size
  40     long style
  41     wxString name