Código Delphi [-] var td = Datetime; begin Dfecha.date:= recodeDate(DT,yearof(now), 01, 01,)
var td = Datetime; begin Dfecha.date:= recodeDate(DT,yearof(now), 01, 01,)