Problema con las fechas desde el cambio a horario de verano

[Faneka]

Yo supongo que la AEAT tiene que saber que los registros vienen de un sitio que tiene una hora menos sino todos los RF los daria aceptado con errores. Porque tu mandas por ejemplo a las 9 y ellos tendran que lo reciben a las 10.
Hablandolo con mi compañero nosotros tenemos un cliente que es de Canarias y claro el programa es el mismo, no hace un ajuste de hora al enviar ni nada.

[Maska10]

Bueno, resuelto, le he añadido al código esta función para saber si estamos en horario de verano y listo:

function EsHorarioVerano(Date: TDate): Boolean;
var
tzInfo: TTimeZoneInformation;
Horario: DWORD;
begin
Horario:= GetTimeZoneInformation(tzInfo);
if Horario = TIME_ZONE_ID_DAYLIGHT then
Result:= True
else
Result:= False;
end;

[YellowStone]

Lo suyo es que obtengáis la hora oficial de España, del Real Instituto y Observatorio de la Armada (ROA), a través de NTP. https://www2.roa.es/hora/

Luego ya añades 0, 1 o 2 según la empresa emisora esté en Canarias o la península o sea horario de verano o invierno.

Por cierto, de momento, si no cambia nada, en Octubre de 2026 es el último cambio programado de hora, no se si las funciones que usamos (yo uso también esa de EsHorarioVerano) tienen en cuenta este posible inconveniente.

[Maska10]

Empezado por YellowStone

Lo suyo es que obtengáis la hora oficial de España, del Real Instituto y Observatorio de la Armada (ROA), a través de NTP. https://www2.roa.es/hora/

Osti ... mira que me hacen repetir la mili eh jaja.