un Registrio que empiece de 1 cada mes!!

[Yun-i]

no todo funciona a la perfeccion resulta que todo lo ase bien
excepto en el mes de febrero si el año no es biciesto

no lo puede serrr bueno tal vez tu sepas cual es el error ya probe con esto

Código Delphi [-]
 
echaDesde:=ReCodeDate(datetimepicker3.Date,Ano, Mes, 1);
// último día
FechaHasta:=ReCodeDate(datetimepicker3.Date,Ano, Mes, DaysInMonth(DateTimePicker1.Date));// en ves de date , 
//datetimepicker3.data pero al parecer eso no tiene nada que ver

Gracias de todas formas ya vamos por menos