Ver Mensaje Individual
  #13  
Antiguo 26-08-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Reputación: 25
__cadetill Va por buen camino
Hola

S.O. Windows 2000 Prof.

Si por medios "no normales" nos referimos a nivel de programa..... he realizado una aplicación sencilla que cambia el día (copy-paste de Trucomanía)

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);

  procedure FechaDelSistema(Fecha: TDateTime);
  var
    FecSys: TSystemTime;
    nA, nM, nD: Word;
  begin
    DecodeDate(Fecha, nA,nM,nD);
    GetLocalTime(FecSys);
    FecSys.wYear  := nA;
    FecSys.wMonth := nM;
    FecSys.wDay   := nD;
    SetLocalTime(FecSys);
  end;

begin
  FechaDelSistema( DateEdit1.Date );
end;

He creado un usuario con permisos de "usuario" que no tiene permisos para cambiar la fecha/hora del sistema (con doble clic en el relojito o por Panel de Control)

He ejecutado el programilla desde ese usuario y..... no ha cambiado la fecha.

Si hay otros mecanismos para cambiar la fecha.... pues ya no se, esto es lo que yo he probado
Responder Con Cita