Add libwx-perl
[pkg-perl] / deb-src / libwx-perl / libwx-perl-0.96 / XS / MessageDialog.xsp
1 #############################################################################
2 ## Name:        XS/MessageDialog.xsp
3 ## Purpose:     XS for Wx::MessageDialog
4 ## Author:      Mattia Barbon
5 ## Modified by:
6 ## Created:     27/11/2000
7 ## RCS-ID:      $Id: MessageDialog.xsp 2118 2007-08-05 17:20:14Z mbarbon $
8 ## Copyright:   (c) 2000-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 %module{Wx};
14
15 %typemap{wxMessageDialog*}{simple};
16
17 #include <wx/msgdlg.h>
18
19 #define wxPL_MSGDLG_STYLE wxOK|wxCENTRE
20
21 %name{Wx::MessageDialog} class wxMessageDialog {
22     wxMessageDialog( wxWindow* parent, wxString message, 
23                      wxString caption = wxMessageBoxCaptionStr,
24                      long style = wxPL_MSGDLG_STYLE, 
25                      wxPoint pos = wxDefaultPosition );
26
27     int ShowModal();
28
29 #if WXPERL_W_VERSION_GE( 2, 9, 0 )
30     bool SetYesNoLabels( const wxString& yes,
31                          const wxString& no );
32     bool SetYesNoCancelLabels( const wxString& yes,
33                                const wxString& no,
34                                const wxString& cancel );
35     bool SetOKLabel( const wxString& ok );
36     bool SetOKCancelLabels( const wxString& ok,
37                             const wxString& cancel );
38     void SetMessage( const wxString& message );
39     void SetExtendedMessage( const wxString& extendedMessage );
40 #endif
41 };
42
43 %name{Wx::MessageBox}
44 int wxMessageBox( wxString message, wxString caption = wxT("Message"),
45                   int style = wxPL_MSGDLG_STYLE, wxWindow* parent = NULL,
46                   int x = -1, int y = -1 );