operaciones con time()

[Gilberth Grissom]

Saludos amigos

una vez mas acudo a ustedes...

tengo un textbox que muestra un horario, ejemplo:

thisform.text1.value = TTOC(DATETIME(),2)  && hora de ingreso para que registre el usuario

luego tengo una hora de salida que por defecto debe mostrar la hora de ingreso mas 8 horas, osea:

thisform.text2.value=TTOC(DATETIME() + 28800,2)

muestra bien la hora pero en formato 12 horas, osea que si son las 8 am en el text2 muestra las 4pm

lo que requiero es que me muestre lo mismo pero en formato 24 horas, es decir que en el segundo text  muestre: 16:00:00 horas

he recurrido a varias funciones una de ellas es el time(), pero no me permite sumar las horas....

¿como haria para que en el segundo muestre las horas pero en formato 24 horas....??

gracias...

--
Grissom

[integral]

Amigo Gilberth :

Este ejemplo contiene el control personalizado de la clase
Samples.vcx, que viene en un formulario de ejemplo en VFP 9.0. La
clase incluye un cuadro de texto para mostrar la fecha y la hora y un
cronómetro para actualizar la pantalla.

La propiedad TimeFormat de la clase clock puede establecerse en
formato de 0 a 24 horas o en formato de 1 a 12 horas. El código del
evento Timer del cronómetro actualiza la hora:

#DEFINE LONGDATE_LOC CDOW(DATE())+" "+CMONTH(DATE())+" "+ ;
ALLTRIM(STR(DAY(DATE())))+", "+ALLTRIM(STR(YEAR(DATE())))

IF This.Parent.TimeFormat = 0
This.Parent.txtTime.Value = IIF(VAL(SUBSTR(TIME(),1,2))>12, ;
ALLTRIM(STR((VAL(SUBSTR(TIME(),1,2))-12)))+SUBSTR(TIME(),
3,6),TIME())
ELSE
This.Parent.txtTime.Value = TIME()
ENDIF

THIS.Parent.txtDate.Value = LONGDATE_LOC

Ahora bien la forma mas simple es utilizando la funcion TIME()

Ej.- ? TIME()

A ello si deseas agregarle a.m. o p.m. tan solo lo asocias a una
instrucicon IIF lineal

Espero haber respondido a tu pregunta....

atte.,

Gabriel
(Lima-Perú)

[Gilberth Grissom]

Gracias amigos, resolvi el problema, basado en el articulo de don Luis Maria y en las sugerencias que nos has dado....

adicionalmente le agrege la condicion que una vez que supere las 24 horas en la suma de horas lo pase al dia siguiente la diferencia de horas...

creo que estar en VFP es estar en el paraiso...!!!

saludos

Grisson

--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.

Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com

--
Grissom