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

   1 #############################################################################
   2 ## Name:        ext/grid/XS/GridTableMessage.xsp
   3 ## Purpose:     XS++ for Wx::PlGridTable
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     08/11/2003
   7 ## RCS-ID:      $Id: GridTableMessage.xsp 2571 2009-05-17 16:46:20Z mbarbon $
   8 ## Copyright:   (c) 2003, 2005, 2009 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{wxGridTableBase*}{simple};
  16 %typemap{wxGridTableMessage*}{simple};
  17
  18 %{
  19 #include "wx/grid.h"
  20 %}
  21
  22 %name{Wx::GridTableMessage} class wxGridTableMessage
  23 {
  24     wxGridTableMessage( wxGridTableBase* table, int id, int int1 = 0, int int2 = 0 );
  25
  26 %{
  27 static void
  28 wxGridTableMessage::CLONE()
  29   CODE:
  30     wxPli_thread_sv_clone( aTHX_ CLASS, (wxPliCloneSV)wxPli_detach_object );
  31 %}
  32     ## // thread OK
  33     ~wxGridTableMessage()
  34         %code{% wxPli_thread_sv_unregister( aTHX_ "Wx::GridTableMessage", THIS, ST(0) );
  35                 delete THIS;
  36                 %};
  37
  38     void SetTableObject( wxGridTableBase* table );
  39     wxGridTableBase* GetTableObject();
  40     void SetId( int id );
  41     int  GetId();
  42     void SetCommandInt( int comInt1 );
  43     int  GetCommandInt();
  44     void SetCommandInt2( int comInt2 );
  45     int  GetCommandInt2();
  46 };