[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Countdown im system tray anzeigen



* Frank Lassowski  [07-03-2008 17:08]:

> Das klappt auch ganz klaglos, nur wäre es schön, wenn die verbleibende
> Zeit im system tray angezeigt werden könnte, als kleiner Text a la "Noch
> 43 min." z.B.

Hallo Frank,

ich werfe mal etwas perl in die Runde:

#!/usr/bin/perl
#
# einfaches Beispiel für einen TrayIcon-Timer,
# benötigt installiertes libgtk2-trayicon-perl
#
use strict;
use warnings;
use Gtk2 '-init';
use Gtk2::TrayIcon;

my $timer   = 60;
my $icon    = Gtk2::TrayIcon->new('timer');
my $label   = Gtk2::Label->new();
my $tooltip = Gtk2::Tooltips->new();

$icon->add($label);
$icon->show_all();

running();
Gtk2->main();

sub running {
    if ($timer > 10) {
        $label->set_markup('<span foreground="#080"
                    size="12345">'.$timer.'</span>');
    }
    else {
        $label->set_markup('<span foreground="#f00"
                    size="12345">'.$timer.'</span>');
    }
    $tooltip->set_tip($icon, "Shutdown in $timer Minuten.");
    timer_refresh();
    Glib::Timeout->add( 1000, sub { running(); 0; } );
}

sub timer_refresh {
    $timer--;
    if ($timer < 1) {
        $timer = 60;
    }
}
### eof

Der Timer soll hier nur zur Demo sein.

Gruß Uwe

Attachment: signature.asc
Description: Digital signature


Reply to: