#############################################################################
## Name:        XS/HyperlinkCtrl.xsp
## Purpose:     XS++ for Wx::HyperlinkCtrl
## Author:      Mattia Barbon
## Modified by:
## Created:     30/07/2006
## RCS-ID:      $Id: HyperlinkCtrl.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};

%typemap{wxHyperlinkCtrl*}{simple};

%{
#if WXPERL_W_VERSION_GE( 2, 7, 0 )

#include <wx/hyperlink.h>
%}

%name{Wx::HyperlinkCtrl} class wxHyperlinkCtrl
{
    %name{newDefault} wxHyperlinkCtrl()
        %code{% RETVAL = new wxHyperlinkCtrl();
                wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
             %};
    %name{newFull} wxHyperlinkCtrl( wxWindow *parent,
                                    wxWindowID id,
                                    const wxString& label, const wxString& url,
                                    const wxPoint& pos = wxDefaultPosition,
                                    const wxSize& size = wxDefaultSize,
                                    long style = 0,
                                    const wxString& name = wxHyperlinkCtrlNameStr )
        %code{% RETVAL = new wxHyperlinkCtrl( parent, id, label, url,
                                              pos, size, style, name );
                wxPli_create_evthandler( aTHX_ RETVAL, CLASS );
             %};

    bool Create( wxWindow *parent,
                 wxWindowID id,
                 const wxString& label, const wxString& url,
                 const wxPoint& pos = wxDefaultPosition,
                 const wxSize& size = wxDefaultSize,
                 long style = 0,
                 const wxString& name = wxHyperlinkCtrlNameStr );

    wxColour GetHoverColour() const;
    void SetHoverColour( const wxColour& colour );
    wxColour GetNormalColour() const;
    void SetNormalColour( const wxColour& colour );
    wxColour GetVisitedColour() const;
    void SetVisitedColour( const wxColour& colour );
    wxString GetURL() const;
    void SetURL ( const wxString& url );
    void SetVisited( bool visited = true );
    bool GetVisited();
};

%name{Wx::HyperlinkEvent} class wxHyperlinkEvent
{
    wxString GetURL();
    void SetURL( const wxString& url );
};

%{
void
new( ... )
  PPCODE:
    BEGIN_OVERLOAD()
        MATCH_VOIDM_REDISP( newDefault )
        MATCH_ANY_REDISP( newFull )
    END_OVERLOAD( "Wx::HyperlinkCtrl::new" )
%}

%{
#endif
%}