[Andrzej_ru]

Спасибо за внимание! Подскажите, пожалуйста, способ изменения системной даты, да и времени тоже. Где-то видел, теперь найти не могу

[Aristarh Dark]

The SetSystemTime function sets the current system time and date. The system time is expressed in Coordinated Universal Time (UTC).

Только учти что у тебя должны быть права на изменение системного времени.

[Andrzej_ru]

Сообщение от Aristarh Dark

Только учти что у тебя должны быть права на изменение системного времени.

Я пробовал, но функция не активна (не появляется "подсказка"), может, в Uses какой-то модуль дописать?

[san-46]

Код:

uses Windows;

procedure SetSysDateTime;
var
  ST : _SYSTEMTIME;
begin
  GetSystemTime(ST); //вначале считываем текущее состояние
//устанавливаем значения каких надо полей
//  ST.wYear := ;     
//  ST.wMonth := ;
//  ST.wDay := ;
  ST.wHour := 8;
//  ST.wMinute := ;
//  ST.wSecond := ;
  SetSystemTime(ST); //установка системных даты и времени
end;

Про UTC можно узнать здесь:
http://ru.wikipedia.org/wiki/UTC
Например, в московском часовом поясе летнее время отличается от UTС на +4 часа. Установка ST.wHour := 8; даст системное время 12 ч.

[Andrzej_ru]

Спасибо! Я Dumcopf, пробовал systemdate вместо systemtime!