Cambiar solo la hora en Delphi

[Casimiro Noteví]

Empezado por orodriguezca

Para que?
No se para que lo necesite Lepuke pero en otra época, cuando aún internet era un lujo y no había mucha divulgación de servidores de tiempo esta era la forma fácil de mantener sincronizada la hora de los PCs de nuestra red local con la hora del servidor.

Nunca se me ocurrió cambiarle la hora al cliente para que esté sincronizado con el servidor, ¿por qué? hay varios motivos, pero uno importante es: ¿y si el cliente está en otro lugar y tiene una hora diferente?

Para tomar la hora del servidor lo que se hace es tomarlo del propio servidor, ejemplo, si guardas una factura con la fecha de la misma, haces un select de la propia base de datos (que está en el servidor, obviamente)

Código SQL [-]
select current_date, current_timestamp
from rdb$database;

De esa forma, da igual la fecha y hora que tenga cada cliente, ya que las fechas y horas se tomarán siempre del servidor.