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

   1 #############################################################################
   2 ## Name:        XS/Caret.xs
   3 ## Purpose:     XS for Wx::Caret
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     29/12/2000
   7 ## RCS-ID:      $Id: Caret.xs 2057 2007-06-18 23:03:00Z mbarbon $
   8 ## Copyright:   (c) 2000-2002, 2004, 2007 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/caret.h>
  14
  15 MODULE=Wx PACKAGE=Wx::Caret
  16
  17 void
  18 wxCaret::new( ... )
  19   PPCODE:
  20     BEGIN_OVERLOAD()
  21         MATCH_REDISP( wxPliOvl_wwin_n_n, newWH )
  22         MATCH_REDISP( wxPliOvl_wwin_wsiz, newSize )
  23         MATCH_VOIDM_REDISP( newDefault )
  24     END_OVERLOAD( Wx::Caret::new )
  25
  26 wxCaret*
  27 newDefault( CLASS, window, width, height )
  28     SV* CLASS
  29   CODE:
  30     RETVAL = new wxCaret();
  31   OUTPUT: RETVAL
  32
  33 wxCaret*
  34 newSize( CLASS, window, size )
  35     SV* CLASS
  36     wxWindow* window
  37     wxSize size
  38   CODE:
  39     RETVAL = new wxCaret( window, size );
  40   OUTPUT: RETVAL
  41
  42 wxCaret*
  43 newWH( CLASS, window, width, height )
  44     SV* CLASS
  45     wxWindow* window
  46     int width
  47     int height
  48   CODE:
  49     RETVAL = new wxCaret( window, width, height );
  50   OUTPUT: RETVAL
  51
  52 void
  53 wxCaret::Create( ... )
  54   PPCODE:
  55     BEGIN_OVERLOAD()
  56         MATCH_REDISP( wxPliOvl_wwin_n_n, CreateWH )
  57         MATCH_REDISP( wxPliOvl_wwin_wsiz, CreateSize )
  58     END_OVERLOAD( Wx::Caret::Create )
  59
  60 bool
  61 wxCaret::CreateSize( window, size )
  62     wxWindow* window
  63     wxSize size
  64   CODE:
  65     RETVAL = THIS->Create( window, size );
  66   OUTPUT: RETVAL
  67
  68 bool
  69 wxCaret::CreateWH( window, width, height )
  70     wxWindow* window
  71     int width
  72     int height
  73   CODE:
  74     RETVAL = THIS->Create( window, width, height );
  75   OUTPUT: RETVAL
  76
  77 void
  78 wxCaret::Destroy()
  79   CODE:
  80     delete THIS;
  81
  82 int
  83 GetBlinkTime()
  84   CODE:
  85     RETVAL = wxCaret::GetBlinkTime();
  86   OUTPUT:
  87     RETVAL
  88
  89 void
  90 wxCaret::GetSizeWH()
  91   PREINIT:
  92     int w;
  93     int h;
  94   PPCODE:
  95     THIS->GetPosition( &w, &h );
  96     EXTEND( SP, 2 );
  97     PUSHs( sv_2mortal( newSViv( w ) ) );
  98     PUSHs( sv_2mortal( newSViv( h ) ) );
  99
 100 wxSize*
 101 wxCaret::GetSize()
 102   CODE:
 103     RETVAL = new wxSize( THIS->GetSize() );
 104   OUTPUT:
 105     RETVAL
 106
 107 void
 108 wxCaret::GetPositionXY()
 109   PREINIT:
 110     int x;
 111     int y;
 112   PPCODE:
 113     THIS->GetPosition( &x, &y );
 114     EXTEND( SP, 2 );
 115     PUSHs( sv_2mortal( newSViv( x ) ) );
 116     PUSHs( sv_2mortal( newSViv( y ) ) );
 117
 118 wxPoint*
 119 wxCaret::GetPosition()
 120   CODE:
 121     RETVAL = new wxPoint( THIS->GetPosition() );
 122   OUTPUT:
 123     RETVAL
 124
 125 wxWindow*
 126 wxCaret::GetWindow()
 127
 128 void
 129 wxCaret::Hide()
 130
 131 bool
 132 wxCaret::IsOk()
 133
 134 bool
 135 wxCaret::IsVisible()
 136
 137 void
 138 wxCaret::Move( ... )
 139   PPCODE:
 140     BEGIN_OVERLOAD()
 141         MATCH_REDISP( wxPliOvl_wpoi, MovePoint )
 142         MATCH_REDISP( wxPliOvl_n_n, MoveXY )
 143     END_OVERLOAD( Wx::Caret::Move )
 144
 145 void
 146 wxCaret::MovePoint( point )
 147     wxPoint point
 148   CODE:
 149     THIS->Move( point );
 150
 151 void
 152 wxCaret::MoveXY( x, y )
 153     int x
 154     int y
 155   CODE:
 156     THIS->Move( x, y );
 157
 158 void
 159 SetBlinkTime( milliseconds )
 160     int milliseconds
 161   CODE:
 162     wxCaret::SetBlinkTime( milliseconds );
 163
 164 void
 165 wxCaret::SetSize( ... )
 166   PPCODE:
 167     BEGIN_OVERLOAD()
 168       MATCH_REDISP( wxPliOvl_wsiz, SetSizeSize )
 169       MATCH_REDISP( wxPliOvl_n_n, SetSizeWH )
 170     END_OVERLOAD( Wx::Caret::SetSize )
 171
 172 void
 173 wxCaret::SetSizeSize( size )
 174     wxSize size
 175   CODE:
 176     THIS->SetSize( size );
 177
 178 void
 179 wxCaret::SetSizeWH( w, h )
 180     int w
 181     int h
 182   CODE:
 183     THIS->SetSize( w, h );
 184
 185 void
 186 wxCaret::Show( show = true )
 187     bool show