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
|
#############################################################################
## Name: XS/FilePickerCtrl.xsp
## Purpose: XS+++ for Wx::File/DirPickerCtrl
## Author: Mattia Barbon
## Modified by:
## Created: 01/11/2006
## RCS-ID: $Id: FilePickerCtrl.xsp 2079 2007-07-08 21:18:04Z mbarbon $
## Copyright: (c) 2006 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};
%{
#if WXPERL_W_VERSION_GE( 2, 7, 0 )
#include <wx/filepicker.h>
%}
%typemap{wxFilePickerCtrl*}{simple};
%typemap{wxDirPickerCtrl*}{simple};
%typemap{wxFileDirPickerEvent *}{simple};
%name{Wx::FilePickerCtrl} class wxFilePickerCtrl
{
%name{newDefault} wxFilePickerCtrl()
%code{% RETVAL = new wxFilePickerCtrl;
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
%};
%name{newFull} wxFilePickerCtrl( wxWindow *parent,
wxWindowID id = wxID_ANY,
const wxString& path = wxEmptyString,
const wxString& message = wxFileSelectorPromptStr,
const wxString& wildcard = wxFileSelectorDefaultWildcardStr,
const wxPoint& pos = wxDefaultPosition,
const wxSize& size = wxDefaultSize,
long style = wxCLRP_DEFAULT_STYLE,
const wxValidator& validator = wxDefaultValidatorPtr,
const wxString& name = wxFilePickerCtrlNameStr )
%code{% RETVAL = new wxFilePickerCtrl( parent, id, path, message,
wildcard, pos, size,
style, *validator, name );
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
%};
bool Create( wxWindow *parent,
wxWindowID id = wxID_ANY,
const wxString& path = wxEmptyString,
const wxString& message = wxFileSelectorPromptStr,
const wxString& wildcard = wxFileSelectorDefaultWildcardStr,
const wxPoint& pos = wxDefaultPosition,
const wxSize& size = wxDefaultSize,
long style = wxCLRP_DEFAULT_STYLE,
const wxValidator& validator = wxDefaultValidatorPtr,
const wxString& name = wxFilePickerCtrlNameStr );
wxString GetPath() const;
void SetPath( const wxString &str );
};
%{
void
new( ... )
PPCODE:
BEGIN_OVERLOAD()
MATCH_VOIDM_REDISP( newDefault )
MATCH_ANY_REDISP( newFull )
END_OVERLOAD( "Wx::FilePickerCtrl::new" )
%}
%name{Wx::DirPickerCtrl} class wxDirPickerCtrl
{
%name{newDefault} wxDirPickerCtrl()
%code{% RETVAL = new wxDirPickerCtrl;
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
%};
%name{newFull} wxDirPickerCtrl( wxWindow *parent,
wxWindowID id = wxID_ANY,
const wxString& path = wxEmptyString,
const wxString& message = wxDirSelectorPromptStr,
const wxPoint& pos = wxDefaultPosition,
const wxSize& size = wxDefaultSize,
long style = wxCLRP_DEFAULT_STYLE,
const wxValidator& validator = wxDefaultValidatorPtr,
const wxString& name = wxDirPickerCtrlNameStr )
%code{% RETVAL = new wxDirPickerCtrl( parent, id, path, message,
pos, size,
style, *validator, name );
wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
%};
bool Create( wxWindow *parent,
wxWindowID id = wxID_ANY,
const wxString& path = wxEmptyString,
const wxString& message = wxDirSelectorPromptStr,
const wxPoint& pos = wxDefaultPosition,
const wxSize& size = wxDefaultSize,
long style = wxCLRP_DEFAULT_STYLE,
const wxValidator& validator = wxDefaultValidatorPtr,
const wxString& name = wxDirPickerCtrlNameStr );
wxString GetPath() const;
void SetPath( const wxString &str );
};
%{
void
new( ... )
PPCODE:
BEGIN_OVERLOAD()
MATCH_VOIDM_REDISP( newDefault )
MATCH_ANY_REDISP( newFull )
END_OVERLOAD( "Wx::DirPickerCtrl::new" )
%}
%name{Wx::FileDirPickerEvent} class wxFileDirPickerEvent {
wxString GetPath() const;
void SetPath( const wxString &p );
};
%{
#endif
%}
|
