How To Change The System Time | |||
| |||
procedure TForm1.Button1Click(Sender: TObject); var systemtime : TSystemTime; NewTime:string; begin NewTime:='13:58:00'; DateTimeToSystemTime( Date+StrToTime(NewTime),systemtime); SetLocalTime(systemtime); end; Tags: DateTimeToSystemTime Delphi SetLocalTime System Time | |||
| |||
| |||
Login for comment |