Re: perl/tk make the taskbar button blink

Slaven Rezic <[email protected]>
Newsgroups gmane.comp.lang.perl.tk
Message-ID <[email protected]>
"Jack D." <[email protected]> writes:

> > -----Original Message-----
> > From: [email protected] 
> > [mailto:[email protected]] On Behalf Of listmail
> > Sent: January 9, 2006 9:45 AM
> > To: [email protected]
> > Subject: perl/tk make the taskbar button blink
> > 
> > I need to find out if it is possible to make the taskbar 
> > button blink manually, perhaps through a module call such as Win32::*
> 
> Yep. Here is a sample from my hard drive ;)
> 
[...]
> 
> init_APIs (); # init APIs and get window handle (must be after update)
> 
[...]
> 
> sub init_APIs {
> 
> my $GetActiveWindow = new Win32::API('user32', 'GetActiveWindow',
>     [], 'N') or die Win32::FormatMessage(Win32::GetLastError());
> $Handle = $GetActiveWindow->Call();

I think you can use $mw->id here to get the HWND. Then there's no need
to require the update().

Regards,
        Slaven

-- 
Slaven Rezic - slaven <at> rezic <dot> de
    babybike - routeplanner for cyclists in Berlin
	       handheld (e.g. Compaq iPAQ with Linux) version of bbbike
    http://bbbike.sourceforge.net
-++**==--++**==--++**==--++**==--++**==--++**==--++**==
This message was posted through the Stanford campus mailing list
server.  If you wish to unsubscribe from this mailing list, send the
message body of "unsubscribe ptk" to [email protected]
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.