hello Mr.Borislav,
i need to sum time for text1+text2+text3+text4+text5..to myform text12 maybe more 5 text.
i try to add new things at your code but i get error masseg ,

LPARAMETERS nSecs, nSec2,nSec3.....
   LOCAL c_hours, c_min, c_znak, nLocSec
   IF TYPE("nSecs") # "C" .OR.;
      TYPE("nSec2") # "C" .OR.;
      TYPE("nSec3") # "C" .OR.;&&& i get error message
      TYPE("nSecs") # TYPE("nSec2")
      TYPE("nSecs") # TYPE("nSec3")&&
      RETURN ""
   ENDIF

   nLocSecs = VAL(LEFT(nSec2,2))*3600
   nLocSecs = VAL(LEFT(nSec3,2))*3600&&
   nLocSecs = nLocSecs + VAL(SUBSTR(nSec2,4,2))*60+ VAL(SUBSTR(nSec2,7,2))
   nLocSecs = nLocSecs + VAL(SUBSTR(nSec3,4,2))*60+ VAL(SUBSTR(nSec3,7,2))&&&
   nLocSecs = nLocSecs + (VAL(LEFT(nSecs,2))*3600 + VAL(SUBSTR(nSecs,4,2))*60+ VAL(SUBSTR(nSecs,7,2)))

   nSecs   = ABS(nLocSecs)
   c_hours = INT(nSecs/3600)
   IF c_hours > 24
      RETURN ""
   ENDIF
   nSecs   = nSecs - (c_hours*3600)
   c_hours = IIF(c_hours<10,"0","")+ALLTRIM(STR(c_hours,15))
   c_min   = INT(nSecs/60)
   nSecs   = nSecs - (c_min*60)
   c_min   = IIF(c_min<10,"0","") + ALLTRIM(STR(c_min,15))
   nSecs   = IIF(nSecs<10,"0","") + ALLTRIM(STR(nSecs,10))
RETURN c_hours+":"+c_min+":"+nSecs
*RETURN c_znak+c_hours+":"+c_min+":"+nSecs

and i try this code at mycommand ,i get error message

thisform.totaltxt.value = thisform.addTIMe(thisform.text3.value,thisform.text2.value, thisform.text1.value)

i need your help,
thanks.
m.qasem