Si quien debe bloquear la fecha es la misma aplicación que la usa, y teniendo en cuenta que al abrir dicha aplicación la fecha/hora es la correcta, creo que lo más seguro (aparte de lo que dice Delphi.Com.Ar de tomar la fecha del Servidor), es hacer un GetTickCount y una llamada a Now al mismo tiempo, es decir al entrar, y almacenarlo en sendas variables de tipo Longint y de tipo TDateTime.
Luego habría que programar una rutina tipo NowActual (en "spanglish") que hiciera un GetTickCount y devolviera la fecha inicial más los días/horas/minutos transcurridos. Esto queda para quien quiera programarlo.
Una pega es que cada 49 días habría que reiniciar contadores.
|