Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

Portal » Foro » Gambas » General

Fecha y hora actual: Martes, 14 May 2024, 14:32 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Podemos En Gambas Mostrar Decimas De Segundo?


Publicar nuevo tema  Responder al tema  		Página 1 de 1
 
 
Podemos En Gambas Mostrar Decimas De Segundo?
Autor Mensaje
Desconectado v3ctor Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación: uruguay.png Uruguay
 
 
Responder citando   Descargar mensaje  
Mensaje Podemos En Gambas Mostrar Decimas De Segundo? 
 
buenas

en Une tengo esta rutina:

Public Sub TmTiempo_Timer()
  
  Dim tiempo As Date
  
  tiempo = Time - TiempoInicio
  LabTiempo.Text = "Tiempo: " & Format$(tiempo, "hh:nn:ss")
  
  Print Now
  
End


pero me gustaría mostrar las décimas de segundo?
se puede?
como?
alguien tiene algún ejemplo?

saludos

Nota: todo esto surgió de una competencia de Une con un amigo.
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
#1  Martes, 29 Agosto 2017, 22:00
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Desconectado v3ctor Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación: uruguay.png Uruguay
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
en date encontré esto:

 332
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
#2  Martes, 29 Agosto 2017, 22:21
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Desconectado tincho Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Noviembre 2014
Mensajes: 2565
Edad: 48
Ubicación: blank.gif
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
u     Muestra un punto y los milisegundos, si son diferentes de cero.
uu     Imprime un punto y los milisegundos con 3 dígitos.
 



 
#3  Martes, 29 Agosto 2017, 22:46
tincho - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado v3ctor Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación: uruguay.png Uruguay
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
tincho escribió: [Ver mensaje]
u     Muestra un punto y los milisegundos, si son diferentes de cero.
uu     Imprime un punto y los milisegundos con 3 dígitos.


si eso lo vi en la ayuda de gambas, pero como ves en el código esta dentro de un timer

y hasta ahora no logro que se vean los miles segundos correctamente, al estilo de los segundos
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
#4  Martes, 29 Agosto 2017, 22:48
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Desconectado tincho Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Noviembre 2014
Mensajes: 2565
Edad: 48
Ubicación: blank.gif
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
De nuestor guru italiano Vuott y su código.
Repeat
    i = DateDiff(tm, Now, gb.Millisecond)
    Write "\rTiempo transcurrido: " & Date(0, 0, 0, 0, 0, 0, i)
  Until i >= dur


Saludos
 



 
última edición por tincho el Martes, 29 Agosto 2017, 22:56; editado 1 vez 
#5  Martes, 29 Agosto 2017, 22:55
tincho - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado v3ctor Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación: uruguay.png Uruguay
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
tincho escribió: [Ver mensaje]
De nuestor guru italiano Vuott y su código.
Repeat
    i = DateDiff(tm, Now, gb.Millisecond)
    Write "\rTiempo transcurrido: " & Date(0, 0, 0, 0, 0, 0, i)
  Until i >= dur


Saludos


pasame el link si lo tienes
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
#6  Martes, 29 Agosto 2017, 23:13
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Desconectado vuott Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60
Ubicación: italia.png
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
v3ctor escribió: [Ver mensaje]
pasame el link

Ėl dice este:

https://foro.gambas-es.org/viewtopic.php?f=5&t=6577
 



 
#7  Miercoles, 30 Agosto 2017, 00:10
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado vuott Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60
Ubicación: italia.png
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
Exemplum minimum:

Private tempus As Timer
Private TiempoInicio As Date


Public Sub Main()

   With tempus = New Timer As "Tempus"
     .Delay = 1
     .Start
   End With
  
   TiempoInicio = Now

End


Public Sub Tempus_Timer()
  
  Write "\r\e[0mTempus ruit ! \e[31m" & Date(0, 0, 0, 0, 0, 0, DateDiff(TiempoInicio, Now, gb.Millisecond))
  
End

 



 
#8  Miercoles, 30 Agosto 2017, 01:16
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado v3ctor Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación: uruguay.png Uruguay
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Podemos En Gambas Mostrar Decimas De Segundo? 
 
vuott escribió: [Ver mensaje]
Exemplum minimum:

Private tempus As Timer
Private TiempoInicio As Date


Public Sub Main()

   With tempus = New Timer As "Tempus"
     .Delay = 1
     .Start
   End With
  
   TiempoInicio = Now

End


Public Sub Tempus_Timer()
  
  Write "\r\e[0mTempus ruit ! \e[31m" & Date(0, 0, 0, 0, 0, 0, DateDiff(TiempoInicio, Now, gb.Millisecond))
  
End


gracias sensei, funciona de maravilla


Link

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
#9  Miercoles, 30 Agosto 2017, 01:44
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Problema Con Tareas En Segundo Plano tercoIDE General 4 Viernes, 28 Noviembre 2014, 15:03 Ver último mensaje
tercoIDE
No hay nuevos mensajes ¿ Podemos En Basic Pasar Una Función Com... Shell General 10 Martes, 14 Julio 2015, 13:45 Ver último mensaje
Shell
No hay nuevos mensajes Granja De Gambas. Ahora Ya Podemos Filtrar... Shell General 0 Domingo, 13 May 2018, 13:06 Ver último mensaje
Shell
No hay nuevos mensajes ¿Podemos Poner La Caja De CheckBox A La D... gambafeliz Controles/Librerías/Componentes 4 Jueves, 05 Septiembre 2019, 14:36 Ver último mensaje
gambafeliz
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Portal » Foro » Gambas » General

Fecha y hora actual: Martes, 14 May 2024, 14:32 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario


  

 
cron