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
|
/////////////////////////////////////////////////////////////////////////////
// Name: cpp/tipprovider.h
// Purpose: C++ wrapper for wxTipProvider
// Author: Mattia Barbon
// Modified by:
// Created: 07/09/2001
// RCS-ID: $Id: tipprovider.h 2239 2007-10-07 19:16:59Z mbarbon $
// Copyright: (c) 2001-2002, 2007 Mattia Barbon
// Licence: This program is free software; you can redistribute it and/or
// modify it under the same terms as Perl itself
/////////////////////////////////////////////////////////////////////////////
#include <wx/tipdlg.h>
class wxPliTipProvider:public wxTipProvider
{
WXPLI_DECLARE_V_CBACK();
public:
wxPliTipProvider( const char* package, size_t currentTip )
:wxTipProvider( currentTip ),
m_callback( "Wx::TipProvider" )
{
dTHX;
m_callback.SetSelf( wxPli_non_object_2_sv( aTHX_ sv_newmortal(), this,
package ) );
}
void SetCurrentTip( size_t currentTip ) { m_currentTip = currentTip; }
DEC_V_CBACK_WXSTRING__VOID( GetTip );
DEC_V_CBACK_WXSTRING__WXSTRING( PreprocessTip );
};
DEF_V_CBACK_WXSTRING__VOID_pure( wxPliTipProvider, wxTipProvider, GetTip );
DEF_V_CBACK_WXSTRING__WXSTRING( wxPliTipProvider, wxTipProvider, PreprocessTip );
// Local variables: //
// mode: c++ //
// End: //
|
