Ver Mensaje Individual
  #7  
Antiguo 16-08-2010
Avatar de afunez2007
afunez2007 afunez2007 is offline
Miembro
 
Registrado: oct 2007
Ubicación: La Ceiba, Honduras
Posts: 170
Reputación: 17
afunez2007 Va por buen camino
Lightbulb

Cita:
Empezado por delphi.com.ar Ver Mensaje
Supongo que será algo como:
Código Delphi [-]function DaysBetween360(const ANow, AThen: TDateTime): Integer; begin Result := (DaysBetween(ANow, AThen) div 30) * 30; end;


Saludos!
La funcion DasyBetween es bastante simple de usar y devuelve la cantidad de dias entre 2 fechas, si tuevieramos dos datetimepcikers por ejemplo seria asi:

Código Delphi [-]
Var
dias: Integer
Begin
 dias:=DaysBetween(Dtp1.Date, Dtp2.date);
end;

Saludos
__________________
Si robas, roba un beso, si mientes que sea por amor y si engañas que sea a la muerte!!
Responder Con Cita