Pusiste en el
uses de la unidad la referencia a la unidad
DateUtils?
Con esa unidad solo tienes que hacer:
Código Delphi
[-]
procedure TFrm_GiftShop.Tbl_GiftShopFecha_RenovaciónChange(Sender: TField);
var
Fecha_Soporte: TDateTime;
begin
Fecha_Soporte := Sender.Value;
IncYear(Fecha_Soporte);
Tbl_GiftShopFech_Pendiente_Renovacion.Value := Fecha_Soporte
end;
Saludos...