git.maemo.org Git - pkg-perl/blob - deb-src/libwx-perl/libwx-perl-0.96/XS/TaskBarIcon.xs

   1 #############################################################################
   2 ## Name:        XS/TaskBarIcon.xs
   3 ## Purpose:     XS for Wx::TaskBarIcon
   4 ## Author:      Mattia Barbon
   5 ## Modified by:
   6 ## Created:     03/12/2001
   7 ## RCS-ID:      $Id: TaskBarIcon.xs 2285 2007-11-11 21:31:54Z mbarbon $
   8 ## Copyright:   (c) 2001, 2004-2005, 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 PACKAGE=Wx::TaskBarIcon
  14
  15 #if defined(__WXMSW__) || \
  16     ( WXPERL_W_VERSION_GE( 2, 5, 2 ) && defined( wxHAS_TASK_BAR_ICON ) )
  17
  18 #include <wx/taskbar.h>
  19
  20 wxTaskBarIcon*
  21 wxTaskBarIcon::new()
  22
  23 void
  24 wxTaskBarIcon::Destroy()
  25   CODE:
  26     delete THIS;
  27
  28 bool
  29 wxTaskBarIcon::IsOk()
  30
  31 bool
  32 wxTaskBarIcon::IsIconInstalled()
  33
  34 bool
  35 wxTaskBarIcon::SetIcon( icon, tooltip = wxEmptyString )
  36     wxIcon* icon
  37     wxString tooltip
  38   CODE:
  39     RETVAL = THIS->SetIcon( *icon, tooltip );
  40   OUTPUT:
  41     RETVAL
  42
  43 bool
  44 wxTaskBarIcon::RemoveIcon()
  45
  46 bool
  47 wxTaskBarIcon::PopupMenu( menu )
  48     wxMenu* menu
  49
  50 MODULE=Wx PACKAGE=Wx::TaskBarIconEvent
  51
  52 wxTaskBarIconEvent*
  53 wxTaskBarIconEvent::new( evtType, tbIcon )
  54     wxEventType evtType
  55     wxTaskBarIcon *tbIcon
  56
  57 #endif