When changing the tip of a notifyicon item perl crashes if the tip is more
than 65 chars. Is this a known limit or a bug? Or has no one else tried
to make a tip that big :) I am on w2k, Activeperl 629(5.6.1),GUI 0.0.558.
Also, in the following example I get a 'Modification of a read-only value
attempted at line 30' why? This works in my full script(if the tip is
short).
use Win32::GUI;
$icon = new Win32::GUI::Icon('c:/3.ico');
$version = Win32::GUI::Version;
print "$version\n";
my $Window = new Win32::GUI::Window (
-name => "Window",
-left => 300,
-dialogui => 1,
-top => 100,
-left => 100,
-width => 400,
-height => 400,
-text => 'test1',
);
$Window->Enable();
my $ni = $Window->AddNotifyIcon(
-name => "NI",
-id => 1,
-icon => $icon,
-tip => "Scheduler Status Unknown"
);
$tip = 'llllllllllllllllllllllllllllllllllllllllllllllllllllllllllll333634';
print length $tip;
$Window->NI->Modify( -tip => $tip); # line 30
print 'done';
--
Nathaniel G. Bartusiak
TTMS, Keesler AFB