alterar hora e data do sistema

Delphi

21/10/2004

como eu posso alterar data e hora do sistema?


Joni

Joni

Curtidas 0

Respostas

Sremulador

Sremulador

21/10/2004

var
SystemTime : TSystemTime;
Dia, Mes, Ano, Hora, Min, Sec, Mil: Word;

Passar as informações para as variaveis Dia, Mes, Ano, Hora, Min, Sec, Mil: Word;


SystemTime.wYear := Ano;
SystemTime.wMonth := Mes;
SystemTime.wDay := Dia;
SystemTime.wHour := Hora;
SystemTime.wMinute := Min;
SystemTime.wSecond := Sec;
SystemTime.wMilliseconds := Mil;

Modificar a data / hora
SetSystemTime (SystemTime);


GOSTEI 0
POSTAR