
August 21st, 2004, 08:32 PM
|
 |
Banned ;)
|
|
Join Date: Nov 2001
Location: Woodland Hills, Los Angeles County, California, USA
|
|
|
Try this:
1. Set the SimplePanel property of the Statusbar component to True.
2. On the OnActivate event, add this line:
Statusbar1.SimpleText := DateTimeToStr(Now);
If you want the time to keep updating every second, do this:
1. Drop a TTimer Component on the form (it's on the System tab of components).
2. Set the Interval property as needed (or keep the default 1000, which is 1 second).
3. On the Timer's OnTimer event, add this line:
Statusbar1.SimpleText := DateTimeToStr(Now);
__________________
Up the Irons
What Would Jimi Do? Smash amps. Burn guitar. Take the groupies home.
"Death Before Dishonour, my Friends!!" - Bruce D ickinson, Iron Maiden Aug 20, 2005 @ OzzFest
Down with Sharon Osbourne
|