Ver la Versión Completa : Problemas con MinutesBetween
romansiux
20-05-2005, 03:00:15
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...
eduarcol
20-05-2005, 06:26:26
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
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
Josep Lluis
20-05-2005, 12:59:04
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
romansiux
21-05-2005, 14:27:56
Gracias a todos por su ayuda, ya me funciono.
Saludos.
vBulletin v3.6.8, Derechos ©2000-2024, Jelsoft Enterprises Ltd.