Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Converting seconds to hh:mm:ss
Message
From
01/07/1998 20:31:46
 
 
To
30/06/1998 17:24:54
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00113159
Message ID:
00113620
Views:
35
>Does any one know of a function tha converts seconds to hh:mm:ss format. For example: 110 seconds would be 00:01:50.
>
>TIA,

Hi Bill, this should be pretty fast. It's simple and uses no slow maths functions, like ^ and LOG

*!***********************************************
*!
*! Function: S2HMS
*!
*!***********************************************
FUNCTION S2HMS
* convert seconds to HHH..:MM:SS
LPARAMETER tnSec
* hours wont display unless > 0
LOCAL nHr, cHr, cMin, nSec

* hours
nHr= INT(m.tnSec/3600)
IF m.nHr = 0
cHr= ""
ELSE
cHr= LTRIM(STR(m.nHr)) + ":"
ENDIF

* minutes
nSec= m.tnSec % 3600
cMin= TRANSFORM(INT(m.nSec/60), "@L 99")

* the rest
RETURN m.cHr + m.cMin + ":" + TRANSFORM(m.nSec % 60, "@L 99")
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform