porcentaje restante entre dos fechas - delphi

11-02-2010

marcoszorrilla marcoszorrilla is offline

Capo

Registrado: may 2003

Ubicación: Cantabria - España

Posts: 11.221

Poder: 10

A ver si es algo como esto:

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
Var
dIni,dFin,dHoy:TDate;
nDias:Extended;
nQuedan:Extended;
nPorcien:Extended;
begin
dIni:=Date - 90;
dFin:=Date + 30;
dHoy:=Date;
nDias:=dFin - dIni;
nQuedan:=dFin - Date;
nPorcien:=nQuedan * 100 / nDias;
ShowMessage(FormatFloat('Porcentaje: '+'.00%',nPorcien));
end

Un Saludo.

__________________
Guía de Estilo de los Foros

Cita:

- Ça c'est la caisse. Le mouton que tu veux est dedans.

« Tema Anterior | Próximo Tema »

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Cambiar a Modo Hibrido Modo Hilado

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
Como sacar diferencia entre 2 fechas con Delphi 5?	flystar	Varios	8	17-05-2011 01:59:05
slq entre dos fechas comparar fechas	taru	MySQL	2	30-07-2007 16:10:36
Problemas de fechas entre Foxpro y Delphi	reynaldo	Tablas planas	4	20-06-2006 09:31:42
Entre fechas	erick_jesus	Impresión	1	29-05-2006 19:10:50
tiempo restante	fedeloko	Varios	3	30-11-2004 18:49:51

La franja horaria es GMT +2. Ahora son las 10:34:31.