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
  #3  
Antiguo 06-12-2010
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.806
Poder: 22
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Y si lo quieres un poco más complejo, podría devolverte la cantidad de días si son más de 24 horas:

Código Delphi [-]
Edit6.Text := MiHoraATexto(32.5); // 1 Dia 8 Horas 30 Minutos
...
function MiHoraATexto (Valor : Real) : string;
var
   Hora : Real;
   FormatoDelphi : TDateTime;
   Dias : integer;
begin
   Hora := 1/24; // Si cada día tiene 24 Horas, una hora es 1/24 = 0.0146...
   FormatoDelphi := Valor * Hora; // 32.5 x 0.0146...= 1.35416...
   if (FormatoDelphi > 1) then
   begin
      Dias := Trunc(FormatoDelphi); // La parte entera de la fecha, 1
      FormatoDelphi := FormatoDelphi - Dias; // 1.35... - 1 = 0.35...
      Result := IntToStr(Dias)+' Dias 'TimeToStr(FormatoDelphi)+' Horas';
   end;
   Result := TimeToStr(FormatoDelphi)+' Horas';
end;
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
edit Str a float Kamael OOP 7 21-03-2010 22:29:53
dar formato float a un edit Jheysson13 Varios 6 05-07-2008 22:30:58
convertir edit de string a float Kamael OOP 1 11-08-2007 03:33:23
Pasar de string a float joanajj Varios 3 04-11-2004 20:29:30
Formato para un EDIT. JANDREGUE Varios 2 22-09-2003 22:41:18


La franja horaria es GMT +2. Ahora son las 22:52:02.


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