[ContraVeneno]

Empezado por Camilo

Pero el tema es que "Fecha:= Now;" es la que no he podido reemplazar por el campo que corresponde.

¿porque no? ¿te marca error? ¿cuál?

Código Delphi [-]
  
  Fecha := TableTarifas_ISs.FieldByName('Tufecha').AsDateTime;
  //directo:
  DecodeDate( TableTarifas_ISs.FieldByName('Tufecha').AsDateTime, ano, mes, dia);