FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Problemas con MinutesBetween
Hola a todos...
Les agradecería mucho sus comentarios. Tengo Delphi 7 y no se como utilizar el MinutesBetween y el SecondsBetween. En mi Form tengo 2 botones al momento de aplastar el botón 1 quiero que enpiece un contador, y que en el momento de aplastar el botón 2 se detenga el contador, y que me muestre en un edit los minutos y segundos transcurridos. Gracias... Saludos... |
#2
|
||||
|
||||
y cual es la duda, si ya realizastes las pruebas pongamos un ejemplo si transcurrieron 2 minutos y 5 segundos entre el click de los botones, te habras dado cuenta de que el minutesbetween te da como resultado 2 mientras q el secondsbetween te daria 125, eso quiere decir qeu si le restas los dos minutos * 60(segundos que componen un minuto) obtendrias el valor real.
Vamos qe no te pongo el codigo para qe te esfuerzes un poco, saludos
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#3
|
||||
|
||||
Segun entiendo, el problema no son las funciones en sí, sino como hacerlo....
Cuando pones el timer en marcha, guardas la fecha y hora actual en una variable, y al detenerlo, le pasas la fecha y hora actual y la que guardaste a esas funciones, y ya tienes la solución. Un saludo
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#4
|
|||
|
|||
a ver si te puede servir
procedure TForm1.Button1Click(Sender: TObject); begin momento1:= now; end; procedure TForm1.Button2Click(Sender: TObject); var minutos, segundos, segundosResto: Int64; begin momento2:= now; segundos:= SecondsBetween(momento1, momento2); minutos:= segundos div 60; segundosResto:= segundos mod 60; Edit1.Text:= IntToStr(minutos) + ' minutos y ' + IntToStr(segundosResto) + 'segundos'; end; No olvides declarar las variables, ni DateUtils en uses |
#5
|
|||
|
|||
Gracias a todos por su ayuda, ya me funciono.
Saludos. |
|
|
|