1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150
|
#############################################################################
## Name: XS/ListBox.xs
## Purpose: XS for Wx::ListBox
## Author: Mattia Barbon
## Modified by:
## Created: 08/11/2000
## RCS-ID: $Id: ListBox.xs 2504 2008-11-06 00:25:57Z mbarbon $
## Copyright: (c) 2000-2003, 2006-2008 Mattia Barbon
## Licence: This program is free software; you can redistribute it and/or
## modify it under the same terms as Perl itself
#############################################################################
MODULE=Wx PACKAGE=Wx::ListBox
#include <wx/listbox.h>
void
new( ... )
PPCODE:
BEGIN_OVERLOAD()
MATCH_VOIDM_REDISP( newDefault )
MATCH_ANY_REDISP( newFull )
END_OVERLOAD( "Wx::ListBox::new" )
wxListBox*
newDefault( CLASS )
PlClassName CLASS
CODE:
RETVAL = new wxListBox();
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
OUTPUT: RETVAL
wxListBox*
newFull( CLASS, parent, id = wxID_ANY, pos = wxDefaultPosition, size = wxDefaultSize, choices = 0, style = 0, validator = (wxValidator*)&wxDefaultValidator, name = wxListBoxNameStr )
PlClassName CLASS
wxWindow* parent
wxWindowID id
wxPoint pos
wxSize size
SV* choices
long style
wxValidator* validator
wxString name
PREINIT:
wxString* chs;
int n;
CODE:
if( choices )
n = wxPli_av_2_stringarray( aTHX_ choices, &chs );
else
{
n = 0;
chs = 0;
}
RETVAL = new wxListBox( parent, id, pos, size, n, chs,
style, *validator, name );
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
delete[] chs;
OUTPUT:
RETVAL
bool
wxListBox::Create( parent, id = wxID_ANY, pos = wxDefaultPosition, size = wxDefaultSize, choices = 0, style = 0, validator = (wxValidator*)&wxDefaultValidator, name = wxListBoxNameStr )
wxWindow* parent
wxWindowID id
wxPoint pos
wxSize size
SV* choices
long style
wxValidator* validator
wxString name
PREINIT:
wxString* chs;
int n;
CODE:
if( choices )
n = wxPli_av_2_stringarray( aTHX_ choices, &chs );
else
{
n = 0;
chs = 0;
}
RETVAL = THIS->Create( parent, id, pos, size, n, chs,
style, *validator, name );
delete[] chs;
OUTPUT:
RETVAL
void
wxListBox::Deselect( n )
int n
void
wxListBox::GetSelections()
PREINIT:
wxArrayInt selections;
PPCODE:
THIS->GetSelections( selections );
PUTBACK;
wxPli_intarray_push( aTHX_ selections );
SPAGAIN;
int
wxListBox::HitTest( point )
wxPoint point
#if WXPERL_W_VERSION_LT( 2, 9, 0 )
void
wxListBox::InsertItems( items, pos )
wxArrayString items
int pos
#endif
bool
wxListBox::IsSelected( n )
int n
void
wxListBox::SetSelection( n, select = true )
int n
bool select
void
wxListBox::SetStringSelection( string, select = true )
wxString string
bool select
void
wxListBox::SetFirstItem( n )
int n
void
wxListBox::SetFirstItemString( str )
wxString str
CODE:
THIS->SetFirstItem( str );
#if WXPERL_W_VERSION_LT( 2, 9, 0 )
void
wxListBox::Set( choices )
wxArrayString choices
#endif
|