Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 16-06-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 25
Caro Va por buen camino
Hola Delphitest, puedes utilizar el tipo Real, en el resultado de la suma, la parte entera te dara los días y la parte decimal las horas, a la cantidad de dias le multiplicas por 24 .....

Código Delphi [-]
var
 h1, h2 : TTime;
 dias, horas, suma : Real;
 Hour, Min, Sec, MSec: Word;
begin
 h1 := StrToTime('23:00');
 h2 := StrToTime('21:10');

 suma := h1 + h2;
 
 dias := Int(suma);//obtenemos la parte entera
 horas := Frac(suma); //la parte fraccionaria
 
 DecodeTime(suma, Hour, Min, Sec, MSec); //descomponemos
 
 dias := dias*24 + Hour;
 
 showmessage(FloatToStr(dias)+' : '+IntToStr(Min));

De esa forma tomamos en cuenta los minutos, segundos....

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Suma de 2 Reales lKinGl Varios 8 14-04-2008 13:00:43
variable dentro de una variable molinero1 Varios 3 23-04-2007 12:44:48
Suma de Memos sierraja Varios 4 09-05-2005 16:39:36
Suma de un campo silviodp Conexión con bases de datos 13 11-06-2004 16:51:23
suma de un campo sql noe SQL 16 19-01-2004 18:52:54


La franja horaria es GMT +2. Ahora son las 19:15:55.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi