Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Select and sum
Message
 
 
À
20/06/2005 16:20:50
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Versions des environnements
Visual FoxPro:
VFP 8
Database:
Visual FoxPro
Divers
Thread ID:
01024603
Message ID:
01024965
Vues:
16
>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--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform