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

   1 #############################################################################
   2 ## Name:        XS/Gauge.xs
   3 ## Purpose:     XS for Wx::Gauge
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     08/11/2000
   7 ## RCS-ID:      $Id: Gauge.xs 2057 2007-06-18 23:03:00Z mbarbon $
   8 ## Copyright:   (c) 2000-2001, 2003, 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 #include <wx/gauge.h>
  14
  15 MODULE=Wx PACKAGE=Wx::Gauge
  16
  17 void
  18 new( ... )
  19   PPCODE:
  20     BEGIN_OVERLOAD()
  21         MATCH_VOIDM_REDISP( newDefault )
  22         MATCH_ANY_REDISP( newFull )
  23     END_OVERLOAD( "Wx::Gauge::new" )
  24
  25 wxGauge*
  26 newDefault( CLASS )
  27     PlClassName CLASS
  28   CODE:
  29     RETVAL = new wxGauge();
  30     wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  31   OUTPUT: RETVAL
  32
  33
  34 wxGauge*
  35 newFull( CLASS, parent, id, range, pos = wxDefaultPosition, size = wxDefaultSize, style = wxGA_HORIZONTAL, validator = (wxValidator*)&wxDefaultValidator, name = wxGaugeNameStr )
  36     PlClassName CLASS
  37     wxWindow* parent
  38     wxWindowID id
  39     int range
  40     wxPoint pos
  41     wxSize size
  42     long style
  43     wxValidator* validator
  44     wxString name
  45   CODE:
  46     RETVAL = new wxGauge( parent, id, range, pos, size,
  47         style, *validator, name );
  48     wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  49   OUTPUT:
  50     RETVAL
  51
  52 bool
  53 wxGauge::Create( parent, id, range, pos = wxDefaultPosition, size = wxDefaultSize, style = wxGA_HORIZONTAL, validator = (wxValidator*)&wxDefaultValidator, name = wxGaugeNameStr )
  54     wxWindow* parent
  55     wxWindowID id
  56     int range
  57     wxPoint pos
  58     wxSize size
  59     long style
  60     wxValidator* validator
  61     wxString name
  62   C_ARGS: parent, id, range, pos, size, style, *validator, name
  63
  64 #if defined( __WXMSW__ ) || defined( __WXPERL_FORCE__ )
  65
  66 int
  67 wxGauge::GetBezelFace()
  68
  69 #endif
  70
  71 int
  72 wxGauge::GetRange()
  73
  74 #if defined( __WXMSW__ ) || defined( __WXPERL_FORCE__ )
  75
  76 int
  77 wxGauge::GetShadowWidth()
  78
  79 #endif
  80
  81 int
  82 wxGauge::GetValue()
  83
  84 #if defined( __WXMSW__ ) || defined( __WXPERL_FORCE__ )
  85
  86 void
  87 wxGauge::SetBezelFace( width )
  88     int width
  89
  90 #endif
  91
  92 void
  93 wxGauge::SetRange( range )
  94     int range
  95
  96 #if defined( __WXMSW__ ) || defined( __WXPERL_FORCE__ )
  97
  98 void
  99 wxGauge::SetShadowWidth( width )
 100     int width
 101
 102 #endif
 103
 104 void
 105 wxGauge::SetValue( pos )
 106     int pos
 107
 108 #if WXPERL_W_VERSION_GE( 2, 5, 1 )
 109
 110 bool
 111 wxGauge::IsVertical()
 112
 113 #endif
 114
 115 #if WXPERL_W_VERSION_GE( 2, 7, 1 )
 116
 117 void
 118 wxGauge::Pulse()
 119
 120 #endif