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

   1 #############################################################################
   2 ## Name:        XS/EvtHandler.xs
   3 ## Purpose:     XS for Wx::EvtHandler
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     26/11/2000
   7 ## RCS-ID:      $Id: EvtHandler.xs 2315 2008-01-18 21:47:17Z mbarbon $
   8 ## Copyright:   (c) 2000-2003, 2005, 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 MODULE=Wx PACKAGE=Wx::EvtHandler
  14
  15 wxEvtHandler*
  16 wxEvtHandler::new()
  17   CODE:
  18     RETVAL = new wxEvtHandler();
  19     wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
  20   OUTPUT:
  21     RETVAL
  22
  23 void
  24 wxEvtHandler::AddPendingEvent( event )
  25     wxEvent* event
  26   CODE:
  27     THIS->AddPendingEvent( *event );
  28
  29 void
  30 wxEvtHandler::Connect( id, lastid, type, method )
  31     wxWindowID id
  32     int lastid
  33     wxEventType type
  34     SV* method
  35   CODE:
  36     if( SvOK( method ) )
  37     {
  38         THIS->Connect( id, lastid, type,
  39                        wxPliCastEvtHandler( &wxPliEventCallback::Handler ),
  40                        new wxPliEventCallback( method, ST(0) ) );
  41     }
  42     else
  43     {
  44         THIS->Disconnect( id, lastid, type,
  45                           wxPliCastEvtHandler( &wxPliEventCallback::Handler ),
  46                           0 );
  47     }
  48
  49 void
  50 wxEvtHandler::Destroy()
  51   CODE:
  52     delete THIS;
  53
  54 bool
  55 wxEvtHandler::Disconnect( id, lastid, type )
  56     wxWindowID id
  57     int lastid
  58     wxEventType type
  59   CODE:
  60     RETVAL = THIS->Disconnect( id, lastid, type,
  61         wxPliCastEvtHandler( &wxPliEventCallback::Handler ) );
  62   OUTPUT:
  63     RETVAL
  64
  65 bool
  66 wxEvtHandler::GetEvtHandlerEnabled()
  67
  68 wxEvtHandler*
  69 wxEvtHandler::GetNextHandler()
  70
  71 wxEvtHandler*
  72 wxEvtHandler::GetPreviousHandler()
  73
  74 bool
  75 wxEvtHandler::ProcessEvent( event )
  76     wxEvent* event
  77   C_ARGS: *event
  78
  79 #if WXPERL_W_VERSION_GE( 2, 9, 0 )
  80
  81 bool
  82 wxEvtHandler::SafelyProcessEvent( event );
  83     wxEvent* event
  84   C_ARGS: *event
  85
  86 #endif
  87
  88 void
  89 wxEvtHandler::SetEvtHandlerEnabled( enabled )
  90     bool enabled
  91
  92 void
  93 wxEvtHandler::SetNextHandler( handler )
  94     wxEvtHandler* handler
  95
  96 void
  97 wxEvtHandler::SetPreviousHandler( handler )
  98     wxEvtHandler* handler