RE: flash?

[email protected] Mon, 13 Nov 2006 18:22:50 +0100
Newsgroups gmane.comp.lang.perl.tk
Message-ID <[email protected]>
"Konovalov, Vadim Vladimirovich (Vadim)** CTR **" <[email protected]> wrote:
> > >> Can anyone give me an example code of how TK's flash()
> > >> function works with a button?
> > >
> > >Here's a oneliner:
> > >
> > >perl -MTk -e 
> > '$b=tkinit->Button->pack;$b->repeat(1000,sub{$b->flash});MainLoop'
> > 
> > I was in the process of trying to get a flash under Windows 
> > when Slaven's response arrived.  Neither my examples nor 
> > Slaven's seem to work.
> 
> I also noticed: this one-liner works okay on Linuxes and on older perl/Tk (perl-5.004_02+Tk4 works okay)
> But neither 800 nor 804 work on windows.
> 
> Vadim.

What about original Tcl/Tk?

-- 
     __o		Slaven Rezic
   _`\<,_		slaven <at> rezic <dot> de
__(_)/ (_)____
______________________________________________________________________________
--++**==--++**==--++**==--++**==--++**==--++**==--++**==
ptk mailing list
[email protected]
https://mailman.stanford.edu/mailman/listinfo/ptk