Opened by master at 2005-12-21 20:12
User since
2003-10-20
610 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-10-20
610 Artikel
BenutzerIn
so...
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
$id = 1;
$icon = new Win32::GUI::Icon('gfx/icon.ico');
$main2 = Win32::GUI::Window->new(
-name => 'Main',
-text => 'Perl',
-width => 200,
-height => 200,
);
$ni = $main2->AddNotifyIcon(
-name => "systray",
-id => $id,
-icon => $icon,
-tip => $guitxt{tray'} );
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;