× Linguagem de Programação ADVPL

Perguntas Cronometro com FOR

Mais
10 anos 10 meses atrás #19754 por LucasdeLucca
Pessoal o código abaixo compila e esta rodando blz... Mas existe alguma forma pra exibir a variável segundos com duas casas decimais?

#include "Protheus.ch"

/*TOTVS NF
Lucas de Lucca
CSA
27/12/2013
Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo.
*/
user Function cronometro()

Local i:=0, segundos:=0, minutos:=0, hora:=0 // Zera os contadores
for i:=0 to 62 Step 1 // Define quanto tempo irá marcar em minutos. "Contar 1h 2min"
for segundos:=0 to 60 Step 1/7500 // Repetição dos segundos
if segundos = 60 // quando somar 60 segundos..
minutos += 1 // .. adicionar 1 minuto
endif
if minutos = 60 // quando somar 60 minutos..
hora += 1 // ..adicionar 1 hora
endif
Conout(cValToChar(hora) +":" +cValToChar(minutos) +":" +cValToChar(segundos)) //Display
next
next

return

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 10 meses atrás #19769 por lalberto
Respondido por lalberto no tópico Cronometro com FOR
Conout(cValToChar(hora) +":" +cValToChar(minutos) +":" +Str(segundos,6,2)) //Display

Veja se funfa.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 10 meses atrás #19770 por LucasdeLucca
Respondido por LucasdeLucca no tópico Cronometro com FOR
Luiz, vc é o cara! ficou bunitinho assim:
Conout(cValToChar(hora) +":" +cValToChar(minutos) +":" +Str(segundos,5,2)) //Display

Valeu

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 10 meses atrás #19771 por lalberto
Respondido por lalberto no tópico Cronometro com FOR
Blz Brother, precisando procura a gente. Abraços.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.138 segundos
Joomla templates by a4joomla