Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Select and sum
Message
 
 
To
20/06/2005 16:20:50
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 8
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01024603
Message ID:
01024965
Views:
17
>hi,
>the functin is work ,
>i mean the result not the same if i calculate it manualy,
>just if you have atime to test my seconds 540600.
>
* FUNCTION Sec2Str
LPARAMETERS tnSeconds, llDays
LOCAL lcHH, lnTm, lcMM, lcSS, lcTime
lnTm = tnSeconds
IF llDays
	lcDD = TRANSFORM(INT(lnTm / 86400), "99") + " "
	lnTm = tnSeconds % 86400
	lcHH = TRANSFORM(INT(lnTm / 3600), "@L 99")
ELSE	
	lcDD = ""
	lcHH = TRANSFORM(INT(lnTm / 3600), "@L 999")
ENDIF	
lnTm = lnTm % 3600
lcMM = TRANSFORM(INT(lnTm / 60), "@L 99")
lcSS = TRANSFORM(INT(lnTm % 60), "@L 99")
lcTime = lcDD + lcHH + ":" + lcMM + ":" + lcSS
RETURN lcTime
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform