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





Reply via email to