Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: wxPerl Simulated 7 Segment LCD Display

by ww (Archbishop)
on Jan 19, 2013 at 01:42 UTC ( #1014159=note: print w/replies, xml ) Need Help??


in reply to wxPerl Simulated 7 Segment LCD Display

Nicely done.

A followup( to convert this to a running clock) should be easy and not too protracted a job.

  1. Remove (comment out) the mvalue in $wxGlobals{mValue}.
  2. Insert code to use localtime() to obtain $hour and $minute (as global vars).
  3. Write a routine to ensure those values have two digits.
  4. Use the (global) formatted $hour and $min in the sub do drawing{ instead of the hash element.
  5. And, of course, put the whole thing in a loop with a sleep 15 (or so, +/-) so the clock will update.

Of course, there are easier ways -- including perching a USD 2.49 (cheapo) clock in your view... and better than this top-of-the-head expression of enthusiasm for your "learning...taking place." :)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1014159]
help
Chatterbox?
[PriNet]: quick question... anyone know how to remove all the existing keys in a %hash ? i've tried several options, but when i re-use the hash, some of the "upper" keys that i don't re-use stick and i can't get them to "remove"
[atcroft]: PriNet: %hash = ();? or foreach my $k ( keys %hash ) { delete $hash{$k}; }?

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2017-06-28 02:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How many monitors do you use while coding?















    Results (619 votes). Check out past polls.