Ayuda con rango de fechas

[microbiano]

bien resulta que tengo que hacer una funcion que determine cuantos meses hay entre un rango de fechas, ejemplo.

fecha inicio :7/01/2011 //realmente seria la fecha del ultimo pago
fecha fin: 07/03/2011// seria la fecha que tendria el sistema al dia que el usuario quiere realizar el pago.


a mi entender en numero de meses en este rango seia 1 el cual corresponderia a febrero, bien pues no se como ahcer jjajajaj, alguna suregencia. es para calcular que meses no ha pagado un usuario.


saludos y de antemano muchas gracias.

[afxe]

En la libreria DateUtils tienes la funcion MonthsBetween (a partir de Delphi 7)

Bye

[microbiano]

amigo tendras algun ejemplo de como se usa esa funcion por que ya lo intenten asi (MonthsBetween(date2,date1)) pero me manda error. no compatible, el resultado en que tipo de variable tendria que guardarlo.

[ecfisa]

Hola microbiano.

Ejemplo:

Código Delphi [-]
uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
var
  D1,D2: TDate;
  R: Integer;
begin
  D1:= StrToDate('07/01/2011');
  D2:= StrToDate('07/03/2011');
  R:= MonthsBetween(D1,D2);
  ShowMessage('Meses comprendidos entre ' + DateToStr(D1) + ' y ' +
              DateToStr(D2) + ':  ' + IntToStr(R));
end;

Un saludo.

[microbiano]

Excelente Muchas Gracias es lo que estaba buscando muchas gracias Amigo.

[microbiano]

hola hasta ahora me ha funcionado lo del rango de fechas, pero ahora necesito saber el nombre de los meses :-( que estan en ese ranfo por ejemplo 01/01/2001 al 01/04/2011, bien con la instruccion anterior me da el numero de meses esw decir me dice 2 meses, pero como puedo sabe el nombre de los meses en este caso seria Febrero y Marzo.

alguna sugerencia?.


de antemano muchas gracias por su respuesta.

[microbiano]

resulta que no tngo indea de como hacer un formulario de cobro de agua potable, necesito determinar cuantos meses exisnten entre un rango de fechas para verificar cuantos meses se deben cobrar con recargo, pero que pasa si el usuario paga todo el año completo.

alguien tiene una aplicacion para cobro de algun servicio que a la vez sea por mes y que a la vez se vea que mes ya se pago que me de una idea de como se hace

[[Chris]]

Empezado por microbiano

...necesito determinar cuantos meses exisnten entre un rango de fechas para verificar cuantos meses se deben cobrar con recargo, pero que pasa si el usuario paga todo el año completo.

OK OK OK OK! Estás desesperado creo. Eso no es bueno. Tómalo con calma que nada es para tanto

La solución de tu problema va por "volver a la mesa de dibujo o diseño", cómo quieras llamarle. Por lógica se deduce que si un cliente ya pago con antelación todo el año, él ni siquiera debería aparecer en la tabla de morosos. Si con los datos brindados por la DB no puedes deducir cuando un cliente ha pagado con antelación, pues creo que estás en un grave problema y necesitas revisar el diseño de tu sistema.

Con respecto a la diferencia de meses entre dos fechas, es un poco más complicado. A cómo se te ha mencionado, la función MonthBetween no puede garantizar ser exacta. Por lo delicado del asunto, no puedes pasar por alto esa impresión de la función. Ahorita, con sueño y con ganas más de dormir que de otra cosa, sólo se me ocurre que deberías de adentrarte a tratar de construir un algoritmo adecuado específicamente para la circunstancia que te premia. Gracias a Dios que los desarrolladores de Delphi nos dejaron rutinas para saber en qué mes estamos, en que día del año también. Cuando estamos en un año bisiesto y así sucesivamente. Creo que una ensalada de estas funciones puede ayudarte a determinar con mayor precisión cuando un cliente ha cumplido uno o más meses de mora.

Saludos,
Chris