DECLARE LONG GetTickCount IN WIN32API
LOCAL LNAPIRETVAL, LNHOUR, LNMIN
LNTICK = GETTICKCOUNT()
TNHOURS = INT(LNTICK / 3600000)
IF (TNHOURS > 23)
	TNDAYS = INT(TNHOURS/24)
	TNHOURS = MOD(TNHOURS, 24)
ELSE
	TNDAYS = 0
ENDIF

LNTICK = MOD(LNTICK, 3600000)
TNMINUTES = INT(LNTICK / 60000)
TNSECOND1 = MOD(LNTICK, 60000) / 1000
TNSECONDS = int(tnsecond1)
THISFORM.TEXT1.VALUE= PADL(TNHOURS,2,"0");
	+ ALLTRIM(":")+PADL(TNMINUTES,2,"0");
	+ ALLTRIM(":")+PADL(TNSECONDS,2,"0")