PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 25 → Wx - Trabalhando com diferença de datas
Wx - Trabalhando com diferença de datas
Iniciado por adrianoboller, dez., 22 2015 2:05 PM - Sem resposta
#1
Membro registado
3.657 mensagems
Popularité : +175 (223 votes)
Publicado em dezembro, 22 2015 - 2:05 PM
Prezados,

Segue um exemplo interessante:

Procedure InicializaFiltro()

QuatroHorasAntes is DateTime = DateSys()+TimeSys()
QuatroHorasMenos is string = (QuatroHorasAntes..Hour - 4)+":00" // menos 4 horas
EDT_Data_Inicial = DateToString(DateSys(),"DD/MM/YYYY")
EDT_Hora_Inicial = QuatroHorasMenos
EDT_Data_Final = DateToString(DateSys(),"DD/MM/YYYY")
EDT_Hora_Final = TimeToString(TimeSys(),"HH:MM:SS") // hora atual


--
Adriano Jose Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
______________________________________________
→ Voltar para WINDEV 25