Per the docs, DblClick event is not available on the NotifyIcon. However, you
can:
sub NI_MouseEvent
{
my $a = shift;
my %events = (
512 => 'Mouse Move',
514 => 'Left Click',
515 => 'Left DoubleClick',
517 => 'Right Click',
518 => 'Right DoubleClick',
519 => 'Middle Down',
520 => 'Middle Up',
);
if ($a != 512)
{
if (exists ($events{$a}))
{
print "Event :" ,$events{$a}, "\n";
}
else
{
print $a,"\n";
}
}
}
with a NotifyIcon named NI and catch them all yourself. However, click events
will be fired twice before the doubleclick event is fired.
Joe Frazier, Jr.
Technical Support Engineer
Peopleclick Service Support
Tel: +1-800-841-2365
E-Mail: mailto:[EMAIL PROTECTED]
> -----Original Message-----
> From: Morbus Iff [mailto:[EMAIL PROTECTED]
> Sent: Monday, October 21, 2002 4:02 PM
> To: perl-win32-gui-users@lists.sourceforge.net
> Subject: [perl-win32-gui-users] Systray Double Clicks Not Working?
>
>
>
> How come this will work:
>
> sub _Systray_Click {
> $window->Enable;
> $window->Show;
> }
>
> but this won't:
>
> sub _Systray_DblClick {
> $window->Enable;
> $window->Show;
> }
>
> I'd like to follow Win32 standards by only maximizing the window when
> a double click has been passed, but I'm not able to make that happen.
> Do I need to start counting single-clicks? ;)
>
>
> --
> Morbus Iff ( i'm the droid you're looking for )
> Culture: http://www.disobey.com/ and http://www.gamegrene.com/
> Please Me: http://www.amazon.com/exec/obidos/wishlist/25USVJDH68554
> icq: 2927491 / aim: akaMorbus / yahoo: morbus_iff / jabber.org: morbus
>
>
>
> -------------------------------------------------------
> This sf.net emial is sponsored by: Influence the future
> of Java(TM) technology. Join the Java Community
> Process(SM) (JCP(SM)) program now.
> http://ad.doubleclick.net/clk;4699841;7576298;k?http://www.sun
> .com/javavote
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
