Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 08-01-2007
Avatar de ArdiIIa
[ArdiIIa] ArdiIIa is offline
Miembro Premium
 
Registrado: nov 2003
Ubicación: Valencia city
Posts: 1.481
Poder: 24
ArdiIIa Va por buen camino
Creo que esta función podría ayudarte

Código Delphi [-]
function Get_Meses(DataFim, DataIni: TDate):Integer;
var
  DiaF, MesF, AnoF, DiaI, MesI, AnoI: Word;
  Dias, Meses, Anos: integer;
begin
  DecodeDate( DataIni, AnoI, MesI, DiaI);
  DecodeDate( DataFim, AnoF, MesF, DiaF);
  Dias:=DiaF - DiaI;
  Meses:=MesF - MesI;
  Anos:=AnoF - AnoI;
  if Dias < 0 then
    Dec(Meses);

  Result := Meses + (Anos * 12);
end;


La podría implementar utilizando un campo autocalculado, pasándole los valores de las dos fechas.
Otra opción sería implementarla en una UDF...

NOTA: El código de la función no es mio la autoría se puede encontrar aquí;

Tú mismo.
__________________
Un poco de tu generosidad puede salvar la vida a un niño. ASÍ DE SENCILLO
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
Calcular numero de dias entre dos fechas vero Varios 22 31-05-2011 14:37:34
Obtener tiempo entre fechas YaninaGenia Oracle 5 04-05-2006 20:46:20
función para obtener diferencias entre fechas - Firebird clanmilano SQL 1 11-11-2005 13:29:52
Numero de dias entre fechas (TDateTime) sierraja Varios 4 26-04-2005 18:29:02
numero de semanas entre 2 fechas marrullas SQL 1 10-05-2004 19:21:18


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


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